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PRINT I 



Purpose 

The print i (PRe-edited INTerpretive) system has been primarily designed to 
meet the engineering and scientific computing needs of those 705 installations 
where such work is a secondary computing requirement. 



General characteristics 

Print i is an automatic coding system of the interpretive type, designed to 
make the 705 itself do the major portion of the coding and clerical work. 
It is designed for ease of learning and operation by personnel with little or 
no previous programming experience. It has the following desirable features: 

1. Floating point arithmetic. The programmer need not concern himself with 
the position of decimal points throughout calculation. Entry of fixed point 
numbers and production of fixed point printed output may be made without 
the operator concerning himself with the fact that internal calculation was 
in the floating point mode. 

2. Matching mathematical junctions. All functions operate near optimum speed 
and are computed to an accuracy which is consistent with the arithmetic used. 
Facility is made for the user to insert his own sub-routines, by using the 
"tinkertoy" appendix (Appendix III). The library of functions is greatly 
extended by the floating sub-routine feature, which allows non-standard func- 
tions in tape storage to be used as though they were standard functions in 
core memory. 



3. Variable address and instruction format. The instructions in this system are 
of varying length and contain a variable number of specified addresses, 
depending on the amount of information each instruction must carry. This is 
consistent with the variable length features which enhance the 705. Coding is 
done in a variable field, with the multiple addresses and other information 
separated by commas. 

4. Advanced instruction set. Many useful combinatorial instructions are incor- 
porated to give greater flexibility to calculations. Among these are vector 
multiply-adds, polynomial multiply-adds, special operations for convergence 
testing, indirect address features, counting switches, counting printing instruc- 
tions and a completely automatic table search operation with an adjustable 
block feature. All of these are performed by the use of a single instruction. 

5. Index registers. An incremental type of indexing is used for address modifica- 
tion, substantially reducing the number of program steps to be written, by 
factors of from 2-1 up to 50-1. Each address may be indexed by the sum of 
the contents of up to three registers, greatly facilitating internal loops. Index 
registers may also be used as counters for control purposes, without actually 
being used for address modification. 

6. Repeat instruction. This instruction controls automatic repetition of a 
following instruction, allowing grouped data to be handled with very few 
instructions. This is advantageous in converting input and output data from 
fixed decimal to floating and vice versa, in table searching, in matrix calcu- 
lations, etc. It also permits a secondary form of indexing. 

7. Facility. Print i may be thought of as a means of using the 705 as a giant but 
convenient desk calculator. Elapsed time between problem statement and 
production of answers can now be a matter of hours, rather than days or 
weeks. The instruction set is straightforward and restrictions are minor; 
many logical errors in the written program are automatically detected and 
typed out to the operator in the form of an error message. 

8. Interpretive system. Print i is operated by an executive routine which is 
always in memory during the running of a problem. This routine fabricates 
the requisite 705 instructions as it computes, finding the various components 
in the pattern of the converted print instruction. There is no necessity for 
developing expert machine language programmers; the intricate coding is 
already built in. The executive routine, under various options, occupies 



from 4000 to 6000 characters in memory (equivalent to 800 to 1200 705 
instructions), but experience with the system has shown that for mathematical 
work one print instruction is the equivalent of about 40 705 instructions. 
The breakeven point is therefore at around 30 print instructions, which is 
a relatively small program. Interpretation is not generally time-consuming 
in print, because the repeat instruction enables the following instruction to 
be performed n times in succession with only a single interpretation. For 
the remaining n— 1 times, the instruction operates, in general, even faster 
than the most expert coder or compiler could generate the program. This 
statement may appear contradictory unless it is understood that, due to the 
possibility of selecting the most advantageous fixed locations in memory, 
certain machine characteristics may be utilized to decrease the operating 
times. These same routines, if compiled in random memory locations, would 
be incapable of operating correctly. 



705 components 

The only memory components required to operate the print system are the 
magnetic core memory and sufficent tape units (> 3) to handle expected 
problem size. An on-line printer and on-line card reader are assumed to be 
available, although they may be dispensed with by certain modifications to 
the system. 



System components 



When operating in the print system, the 705 is for all practical purposes 
changed to a different machine, that is in a non-physical sense. Certain simu- 
lated hardware exists in the system, as: 

1. Index registers. There are three of these registers. They are addressable by 
certain instructions for setting and augmenting their contents. They are 
effectively addressable in the body of other instructions to enable their 
contents to be used to modify addresses. 

2. Limit registers. There are three of these, one for each index register. They 
are for maintaining limits to the contents of the index registers, which are 



used for automatic termination of loops of indexed instructions. 

3. Line image. This is an image in memory of the printer type wheels, such that 
each of the type wheels is effectively addressable. All printing and error 
correcting routines associated with printing are automatically associated 
with this line image. 

4. Heading image. This is also an image in memory of the printer type wheels, 
but is used exclusively for heading printed pages of reports in any format 
the programmer desires. The programmer merely uses two cards in his 
program to specify this heading format. 

5. Card image. This is an image in memory of the card columns. All columns 
are effectively addressable. All card reading, whether from the card reader 
or tape, enters this area; all card writing, whether on tape or to the card 
punch, is done from this area. 

6. Fixed symbolic locations. There are six fixed locations in memory. Although 
addressed symbolically, they are automatically interpreted as actual addresses: 

For numbers (data word length) For addresses 

PAC1 (Pseudo-ACcumulator 1) LAR1 (Location of ARG1) 

PAC2 (Pseudo-ACcumulator 2) LAR2 (Location of ARG2) 

ARG1 (ARGument 1) 

ARG2 (ARGument 2) 

PAC1 is the basic component for the multi-address instructions, for which 
it is the understood address. All arithmetic operations send the result to 
PAC1 as a secondary result storage or temporary working area. The other 
locations are mainly pertinent to the table search operations. 



Overall mode of operation 

The use of print to solve a problem falls into four basic steps. They are 
described very generally here; the actual details of each of these steps are 
contained in the full description of each which follows later in the manual. 

1. The programmer writes, on the symbolic coding form for this system, a 



sequence of print and/or 705 instructions designed to bring in data, do 
arithmetic and logical operations, and finally prepare and produce output 
data. He does this knowing the function of each of the print instructions, as 
described in detail under individual sections. 

2. Cards are punched from this coding form, each line of coding representing 
a single card. Punching is done in consecutive columns and may be done 
without a drum card, as the format is variable. The only column skipped 
before the end of punching is that defining the end of the variable field and 
the beginning of the comments. 

3. These cards are read into the 705 along with the print i system, which 
consists of two independent parts. The first of these is the pre-edit routine, 
which will process the program cards and convert them to pseudo-instructions 
in card or tape form for actual running of the problem. The second part is 
the executive routine, which is always in core memory during the operation 
of a program prepared for this system. The pre-edit routine is not maintained 
in memory after performing its function and is destroyed by entry of the 
executive routine and the program. It is possible to pre-edit at one time and 
save the execution of the problem until a later time, as these are entirely 
separate functions. Pre-editing is a triple function of assembling, compiling 
and conversion to a form more convenient to the executive routine. For each 
card with its mnemonic instruction and variable field, pre-edit produces a 
corresponding pseudo-instruction especially tailored for the fabrication of 
705 instructions from its components. These are of varying length of 
characters according to the operation specified. Matched sets of mnemonic 
and pseudo-instructions may be printed at pre-edit time, at the option of 
the operator, together with the comments punched in the right hand part 
of the variable field. This should be his permanent coding record. 

4. The actual running of the problem is under the control of the executive 

routine, which may be called from tape immediately after pre-editing. The 
executive routine fills from 4000 to 6000 characters in memory, including the 
floating sub-routine position and input-output images. Overflow or sign 
check indicators are not used in print as decision elements. They are reserved 
for stops while operating with 705 instructions and the switches may therefore 
be set to automatic stop during the operation of print. Any entry to print 
sets up the ASU's as required for its operation. All ASU's are therefore avail- 
able for use in 705 language. Their settings should be noted from the ENTer 
sub-routine (see Page 12) to avoid redundant resetting for 705 usage. 



General coding instructions 

Addressing in the print i system is entirely symbolic; that is, the address 
nomenclature can be descriptive of the contents. The symbolic address of a 
location must be a sequence of one alphabetic character followed by three 
or four alphanumeric characters. If these following characters are all numeric 
the address is said to be "regional", which is a sub-class of symbolic notation 
with certain useful properties (see the next section). A "region" is indenti- 
fiable by the first or first two characters (i.e., the "G" region, the "F3" region). 
If the sequence begins with a numeric character, the following characters 
must be all numeric and this signifies an actual 705 address. The symbolic 
locations may be coded in any sequence desired. The format of the print 
coding card is: 



r 



SERIAL 



00000 

1 2 3 4 5 
11111 

22222 
33333 
44444 
55555 
66666 
77777 
8 8 8 8 8 



LOCATION 



000010 

6 7 1 i'io 

1 1 1 ijl 

2 2 2 2 ! 2 

I 

3 33 313 

4 444|4 

5 5 5 5 ! 5 

66 6 616 
I 

7 7 7717 

I 

8 88 818 



OPER- 
ATION 



VARIABLE FIELD 



COMMENTS 



OTO 000000 00 0000 00 00 00000000000000000000000000000000000000 

1112l3H15l!l7 1«19 20 2122 23J425 28Z7 2»aM3l32»3»35*37 3B39«4142«3 44 4S4S47«49M5IIB53M55l«57MMMt1t2 63 64t5 66t7ia69 70 7172 7a74 
111111111 1111111 11 1111 111111 1 1111 111111111111111111111111H 11111 

2 2222 22 222 22 222 2 2 2222 2 2 22 2 2 2 222 2 222 2222222 2 2 2 222 22222 2 2 2222222 2 2 
3333333333333333333333333333333333333333333333333333333333333333 
4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 444444444444444444 
5555555555555555555555555555555555555555555555555555555555555555 
6666666666666666666666666 666666666 6 66666C666666666 6666 6666666666 
7777 777 777 777777777777 77 77777 77 777 77 7 777 7777 777 777777777777 7 7 777 



88888888 8 8888 88 8888 8 688888 88 88 88 8 8888 8 8888888888888 88 88 888 888 

COMMENTS 



VARIABLE FIELD 



14 15 16 17 II ID 20 21 22 23 24 25 26 27 28 29 3D 31 32 33 34 35 36 37 31 39 40 41 42 43 44 45 48 47 48 48 » 51 52 53 54 55 56 57 118 60 61 62 t3 64 65 66 67 61 68 73 71 7 2 7] 74 



000000 

75 76 77 71 78 80 
111111 

222222 
333333 
444444 
555555 
666666 
777777 
888888 



IDENTFICATION 



75 76 77 78 78 80 



'"«»"" 



Columns Serial number. This provides for sequence control and the collation of 

1-5 change cards. Serial numbers must be in ascending sequence. A convenient 

convention is the use of the first two columns for coding page number, the 
second two for line number and the last for inserts. 



Columns Symbolic location. This field provides a referral name for the entry; that 

6-10 is, if the entry is not referred to by any other instruction in the program, the 



field can and should be left unpunched. This will reduce the size of the table 
of symbolic and actual address correspondence, thus decreasing the running 
time of pre-editing by minimizing search time. If the field is punched it must 
follow the rules for a symbolic address, with the alphabetic character in 
column 6. Punching is optional in column 10. 

Columns Operation code. This field must be punched with a 3 character (including 

11-13 blanks as characters) mnemonic code which describes the function of the 

entry. This may be a print operation, a 705 operation or one of the several 

special operations for constants, memory reservations, origins or headings. 

Columns Variable field. This field is punched as the requirements of the particular 

14-74 instruction dictate. The first blank column indicates the beginning of the 

comments field, which may actually extend through to column 80 if no iden- 
tification is required. 

Columns Identification. Any 6 character alphanumeric designation may be punched 

75-80 (ganged) here to identify the program. An identification obtained from the 

first card of the symbolic program deck will be punched in the first 6 columns 

of the 705 load cards produced by pre-edit for reloading, and will also 

appear in the heading of the pre-edit listing. 



Regional notation 



An alternate method of using symbolic addressing is available if the pro- 
grammer desires to code with "unitized" components. If the symbolic address 
is regional, the serial number in columns 1 to 5 may be omitted, in which 
case the numbering sequence within the regional address controls instruction 
sequence in the program. Columns 6 to 10 will always be filled with a regional 
address, regardless of referral status, and referral will now be indicated by 
punching an 1 1-punch in column 1. The drum card of the keypunch should 
be arranged to skip to column 6 for the next punching. If the programmer 
fears becoming careless in noting referral addresses, he may gang the 1 1-punch 
in column 1 of every card, but this could retard the pre-edit process by 
carrying a complete table of referrals. 

Regional addressing is convenient for quick replacement of identifiable 
components with a specific function in the program. To illustrate, consider 
that in a program to compute airplane performance the calculation of engine 



thrust is assigned to region Tl. This region receives as input data certain 
information produced by other regions, computes thrust with this data and 
certain equations, finally putting this resultant thrust value in a location 
usable to other regions. For several different engines, or several different 
ways of computing thrust, different Tl regions would be coded. All of these 
receive and store data in addresses not common to the computing regions, 
but accessible to all. If the programmer wishes to compute performance for 
a certain configuration he selects one form for each region involved and 
processes this combination through the pre-edit routine. He is thus 
guaranteed that housekeeping is perfect and that no pattern of computation 
will have been erroneously disrupted. 



Coding PRINT instructions 



The variable field of print instructions is coded according to the context of 
the instructions. Each operation is described as having a certain number 
of positions in the variable field. Each of these positions are separated by 
commas. An exception occurs for indexable instructions, where a position is 
defined to contain both the address and its index register tag, although 
separated by a comma. The tag is therefore in a sub-position immediately 
following the address it modifies. An address is a field of four or five char- 
acters. It is symbolic if it begins with an alphabetic character; if the first 
character is numeric, all must be numeric and the address is actual. An index 
tag is a field composed of the digits 1, 2 and 3 not repeated which designate 
the index register or registers which are to affect the address in context. If an 
address is not to be indexed, no tag field is written. In the first example the 
address in the second position is the only one indexed; in the second example 
the address in the third position is also indexed. 



LOCATION 
6- -10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD 
14- 




COMMENTS 
-SO 




ADD 


P 202, R 532, 12, QYR5 


A blank column terminates 






ADD 


P 202, R 532, 12, QYR5, 2 


the instruction and starts 






MPY 


RATE, 2, TIME, 23, DIST, 3 


the comments 





Both numeric and alphabetic characters are used in coding for this system. 
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As a standard precautionary practice, always write the letters 0, I and Z as 
shown, with slashes and cross-bars to safely distinguish them from the 
numerals 0, 1 and 2. 

Every program will begin with either a 705 instruction or an ENT 
(ENTer) instruction. Every transfer of control from 705 to print instructions 
and back will be called for by the programmer. Consequently, every block of 
print instructions must be preceded by an ENT, which is compiled by the 
pre-edit into three 705 instructions: 



OPERATION 
CODE 



VARIABLE FIELD 



COMMENTS 



BADD- I 1 



SET 



AmJL 



BADD- ft 



L0D 



BADD-6, 1 



BADD- 'l 



TR 



(to the address of the first instruction in the ENT Sub-routine In 



the PRINT Executive Routine) 



The basic address of the first print instruction is at BADD. This is computed 
by the ENT sub-routine from BADD-6 in ASU01. ASUs are set to length 
and control is transferred to the fetch sub-routine, which brings in the first 
print instruction in the interpretation cycle. 

Following an ENT, all entries are considered by pre-edit as print instruc- 
tions until the instruction LVE (LeaVE) is encountered. LVE is a print 
instruction whose address is normally pre-edited as the location of the next 
705 instruction. When executed, it will cause the executive routine to 
transfer control to that instruction. All succeeding entries will then be 
considered as 705 operations or special operations until another ENT is 
encountered. Thus ENT and LVE are normally coded without addresses in 
the variable field. When LVE is coded with the address of a 705 instruction, 
pre-edit gives that address in conversion rather than that of the next 705 
instruction in sequence. 

An asterisk in the variable field of an ENT indicates that this is the point 
at which the operation of the program will be commenced, rather than the 
first ENT or 705 instruction encountered by the pre-edit. If more than one 
ENT contains an asterisk in the variable field, the first encountered takes 
precedence. An ENT must not precede a 705 or special instruction, else a 
compiling error will occur in memory assignment. When successive entries 
change from print to 705 instructions or vice versa, without intervening 
ENT or LVE entries, pre-edit will type out a mode change error message. 



11 



Upon executing a LVE instruction, advantage may be taken in 705 opera- 
tions of the fact that the ASUs are left with known length settings, as follows: 



ASU Length 



01 
02 
03 
04 
05 



4 
1 
2 
4 
4 



ASU Length 



06 
0? 
08 
09 
10 



4 
4 
Word Length 

1 
1 



ASU Length 

11 2 

12 3 
13 

14 
15 



Indeterminate 
5 

18 



Two successive commas imply that the intervening address is that of the 
main pseudo-accumulator PAC1, which is a field in memory reserved for this 
function. PAC1 is incapable of being indexed, even if tagged; a zero indicator 
is automatically inserted for it by the pre-edit routine. PAC1 may also be 
addressed by the symbol PAC1. If fewer addresses are coded than required by 
a particular instruction, the remaining addresses will be interpreted to be 
PAC1 by the pre-edit. For example, the following instructions are equivalent, 
incidentally doubling the contents of PAC1. 

ADD PAC1, PAC1, PAC1 ADD , , b ADD 

An exception to this rule occurs in the SAC operation. If the result addresses 
are not specified in the second and third positions of the variable field, the 
second position is interpreted as PAC1 and the third as PAC2. 



Coding 705 instructions 



705 instructions are coded either before the first ENT or between LVE and 
the next ENT. Standard 705 mnemonic codes are used. The first field after 
the operation code is interpreted as the address. An actual address can be 
any combination of 4 or 5 numeric digits, as the leading zero does not have 



OPERATION 
CODE 



VARIABLE FIELD 



6- -10 



TR 



CYCLE 



RAD 



F0L3-52, 2 



SET 



9, 13 



COMMENTS 



F0 L3-52 zoned for AS U 02 



Set ASU 13 to length of 0009 
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to be punched. A symbolic address must satisfy the same criteria as the 
addresses of print instructions do. If the address is terminated in a sign, 
the next field is interpreted as an increment. The following field is the ASU 
designation. The instruction refers to the 00 accumulator if no ASU coding 
is present. 



Special operations 



Print i uses various mnemonic special operation codes for initial organi- 
zation of a program. These are illustrated at the end of this section. These 
operations are static and do not create working print or 705 instructions. 

ADC (ADdress Constant) produces a 4 character constant which is the 705 
address determined by the symbolic address, increment and ASU coding in 
the variable field. 

ORG (ORiGin) controls the actual memory assignment of subsequent 
instructions or areas. These are four types of ORG entries, and pre-edit will 
handle up to 100 ORGs with addresses in the variable field. 

1. When the address in the variable field is actual (i.e. numeric), the first 
character of the next entry will be at that specified address. 

2. When the variable field is blank, all following entries will be assigned in 
order following the highest location assigned previously. 

3. When the address in the variable field is identical to the symbolic address 
of the ORG itself, the location of the previous entry will be stored in the 
table of origins for later reference. 

4. When the address in the variable field is a symbolic address stored under 
the conditions of type 3, the succeeding entries will be assigned following 
the location stored by type 3. This is a device for remembering and con- 
tinuing an interrupted series. 

CON (CONstant) and BLK (BLocK) reserve filled or unfilled memory 
space. For either entry, the first position in the variable field is a number of 
from 1 to 3 digits specifying the length of the entry, which in the case of 
CON is limited to 50 characters. If an asterisk precedes the length speci- 
fication the entry starts with a memory position ending in or 5. If a 
constant is signed, the plus or minus sign follows just after the length; plus 
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signs may not be omitted. A blank column and the actual constant follow. 
A record or group mark may appear only in the first character of a constant. 
The address assigned by pre-edit is that of the highest memory position (or 
right-hand character) in the field. 

FLC (FLoating Constant) is a print entry corresponding to CON for 
the 705. Coded in the variable field is the sign and the 1 or 2 character 
exponent, followed by the mantissa sign and as many digits of the mantissa 
as the coder cares to write. These are not separated by commas. The initial 
number of characters in the mantissa is not limited; pre-edit automatically 
converts to internal format, without rounding if the number of characters 
exceeds mantissa length for the system. A blank variable field is considered 
an error by pre-edit. 

DEL (DELete) is a special operation for program correction and is 
explained in the operation of pre-edit and system entry. 

REG (REGister reservation) is a print entry corresponding to BLK. for 
705 entries. It is used to reserve memory space for floating point print 
numbers (words). For reservation of a single word or number space the 
variable field is normally left blank, as the length is already specified by 
the system. The word length area is addressed in other instructions by the 
symbolic address of the REG entry. If the address is regional, a lower address 
in that same region may be written in the variable field, signifying reserva- 
tion for all addresses within those limits. For indexing purposes, all randomly 
symbolic addresses in an operational sequence must be reserved sequentially 
and individually. It is therefore preferable to reserve addresses for indexable 
instructions in the regional mode. Pre-edit will accommodate up to 60 of these 
multiple reservations. 

SAY (SAY it) will enter a line of comment into the pre-edit listing. 

HDG (HeadDinG) is a print entry for inserting a page heading for 
printed reports. Coded in the variable field are a blank (column 14) and 
up to 60 characters in columns 15 to 74. One or two cards may be used, the 
second corresponding to type wheels 61 to 120. 

FIN (FINish) is an entry which signifies termination, in the card reader, 
of the program to be pre-edited. It has the same effect as an end-of-file signal. 
This permits data cards to be loaded into the reader simultaneously with the 
program, without being considered as entries to be pre-edited. The entire 
program may thus be run in a continuous fashion. 
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IBM 



PRINT I SYMBOLIC CODING FORM 



1 PROBLEM ' — ' — 1 

ILLUSTRATING THE VARIOUS USAGES FOR SPECIAL OPERATIONS 




DATE 


PAGE OF 


SERIAL 
1 -5 


LOCATION 
6- -to 


OPERATION 
CODE 

11- 13 


VARIABLE FIELD COMHENTS 
- '"' 80 




MANTI 


ADC 


P0WER -2.9 ( , 09 also correct) 




l 


0RG 


5040 (05040 also correct) 




A123 


RAD 


C0LO8,2 (instruction located at 5044) 






0RG 


35040 




C0N4i5 


C0N 


2+b45b (the number 45, located at address 35041) 


i 


XNYC 


BLK 


56 (reserves 56 characters in memory) 




1 


C0N 


* 28b FOUR b SCORE b ..... 




ZER0 : 


FLC 


+0 + Ox 10° = ZERO 




L0Cli 


FLC 


+ 1 + 1 .1 x 10' = 0NE 




1 — 


FLC 


-12+528 .528 x 10 - ' 2 






FLC 


+ 3-2 -.2x 10 3 = -200 






FLC 


+ 3-200 " 


10000 


i 


DEL 


10006 




F121 


REG 






r i iy — • \ 






Fl 19 


REG 










F119 


REG 


^ 


"^> Identical effects 




F120 


REG 








'* 






F121 


REG 








F121 


REG 


"s 


Will cause normal indexing 




F120 


REG 




> to occur in 




Fl 19 


REG 


J reverse order 






SAY 


THE F0LL0WING 3 ADDRESSES ARE DESIGNED F0R INDEXING 




J0NEIS 


REG 


J Pre-edit assigns memory positions 




SMIT JH 


REG 


f in the order in which 




BR0WJN 


REG 


J they are encountered 




A001 A 


REG 


A 100 A 


Useful technique for greatly 




A001|B 


REG 


A100B 


> expanding the number 




B001 A 


REG 


B100A 


of available regions 






SAY 


THE F0LL0WING LINES SH0W ILLEGAL USAGE 


10006 




DEL 


10001 Will delete 10006 only 


20684 




DEL 


A106, 13, ,F+/4 ( Dangerous to maintain old variable field) 




F 120 1 


REG 


(Will not be included in Fl 19 - F121 sequence) 






REG 


SMITH 




SMIT IH 


REG 


J0NES 




TEMP J 2 


REG 


TEMPI 
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Indexing 



A system of indexing is simulated within the print framework. Most 705 
programmers are already familiar with one means of specifying the location 
of a number without using the actual address. This is symbolic addressing, 
where the actual address is determined by searching a table of symbolic 
addresses, each of which has a corresponding actual address. Indexable 
addressing is one further step up conceptually. If either a symbolic or actual 
address, not only is the corresponding actual address determined from the 
symbolic, but the address which the instruction really refers to is that actual 
address plus the number contained in the index register specified. If that 
index register has a different number in it every time that the same instruc- 
tion refers to it, then the same instruction obviously uses a different address 
every time, although the instruction itself never changes. The examples in 
Appendix II show how the same instruction may be used repetitively to 
advantage. The justification for indexing is the resultant economy in the 
number of instructions that the programmer must write. 
In the out-of-context example shown, the angle whose sine is placed in 
PAC1, and whose cosine is placed in PAC2, is not the angle in the address 
P220. Since R2 (register 2) and R3 have been set to 3 and 8 word lengths 
respectively, it is rather the angle in address P23I, which is P220 plus 3 plus 8. 



6- -10 



P240 



OPERATION 
CODE 



11. -13 



REG 
ENT 



SR2 



SR3 



SAC 



VARIABLE FIELD 



P220 



8 



P220. 23 



COMMENTS 



Reserve sequential addresses 



Set R2 to 3 word lengths 



Set R3 to 8 word lengths 



Sine to PAC I r cosine to PAC 2 



The 23 tag after the address in the first position indicated that the address 
was to be incremented by the sum of the contents of R2 and R3. In print i, 
the contents are added to the address and indexing is said to be incremental. 
By contrast, 704 indexing is decremental. There are 3 index registers, referred 
to as Rl, R2 and R3. Any address in an indexable instruction may be incre- 
mented by the contents of any of these registers or the arithmetic sum of 
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the contents of any two or all three. This alteration takes place in a work 
area before fabricating the necessary machine language instructions from the 
address portions of the print instruction involved. The original print instruc- 
tion in operating sequence is never altered. Loops formed by transfer on index 
instructions will therefore be re-indexed from the original instructions. Such 
transfer is dependent upon the contents of the index register not having 
exceeded a specified limit. 

The contents of index registers are used only for address modification with 
705 add-to-memory instructions. The contents are unsigned and 4 digits in 
length. Increments are carried in memory as true numbers, decrements as 
the complements of 40,000. To increase operating speeds, all possible sums 
of contents of index registers are carried along in memory. When any register 
is altered, the contents of each combination in which that register participates 
are altered by the same amount. This permits indexing any address by a 
single add-to-memory instruction. 

Direct access to the contents and limits of index registers may be had (in 
705 machine language) by using the actual addresses of 4-character unsigned 
numeric fields as follows: 



Rl limit 0723 
R2 limit 0733 



Rl 


0718 


R2 


0728 


R1+R2 


0738 


R3 


0748 


R1+R3 


0758 


R2+R3 


0768 



R3 limit 0753 



R1+R2+R3 0778 



Diagnostic routines 

Two types of diagnostic methods for error finding are used with print instruc- 
tions. The first of these is a memory print associated with the system control, 
the operation of which is described under the section on pre-editing (page 
44). This method is used primarily to determine cause of machine stops 
during computation. 

The second type of diagnostic is that commonly called "snapshot", and is 
entirely under the selective control of the programmer. This is accomplished 
by inserting extra instructions in the program to be pre-edited. These instruc- 
tions are designed by the programmer to view selected intermediate results 
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or logical path indications. When the program is ascertained to be correct, 
these snapshot instructions have their operation codes changed to DEL and 
are re-collated in with the previously assembled program, thus removing 
them from the operating program. This feature is possible only because 
of the fast re-assembly time in the print system. Most programs will take 
from 30 seconds to 1 minute for tape re-assembly. 

For detail work, a 705 machine language tracing routine is furnished. This 
routine (primarily developed by Mrs. Helen Meek of the Hughes Aircraft 
Company, Culver City, California) may be used as a separate diagnostic tool 
for all work encountered by the installation, including commercial problems. 
The basic principle of this routine is the temporary displacement (and 
storage for later replacement) of certain operating instructions in the working 
program by transfers to the tracing routine. This permits high speed opera- 
tion to various points of interest, at which time detailed tracing occurs. High 
speed operation of the program may be resumed at specified points. Deter- 
mination of the local regions to be traced is under card control. 



Arithmetic operations 



All print i arithmetic operations use numbers in floating decimal form as 
the operands. All 705 operations are in fixed decimal form. A floating decimal 
number is essentially a piece of data and is referred to as a "word". This 
floating point word is comprised of two parts, a proper decimal fraction (called 
the "mantissa") with a non-zero leading digit and a power of 10 multiplying 
that fractional number (called the "power", although "characteristic" is an 
alternate term). Floating point words are 

stored in memory as: although written for input as FLCs: 

± ± 
XXX. . . . XXXPP ±PP±XXX. . . . 

The X's represent the digits of the mantissa and the P's represent the two 
digits of the power, which may range from —99 to +99. The dots signify 
that print i is furnished in separate forms for 8, 10 and 12 digit mantissas. 
The 12 digit system (word length =14 characters) will be furnished origi- 
nally with 12 digit arithmetic but having the mathematical functions 
normally provided with the 10 digit system. A 12 digit system to consistent 
accuracy and a 20 digit system will be available about January 1957. 

Each of these systems will then be complete in itself for all operations, 
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having all sub-routines designed to an accuracy equivalent to the length of 
the mantissa. Sample words in input format, floating point format and their 
equivalent fixed decimal form are: 



Input format 


Internal format 


Actual number 


+0+12345678 


+ + 
1234567800 


.12345678 


+5-1234567899 


- + 
1234567805 


12345.678- 


-5+1234567899 


+ - 
1234567805 


.0000012345678 


+ 1+6 


+ + 
6000000001 


6 


+8+6 


+ + 
6000000008 


60,000,000 


-10+6 


+ - 
6000000010 


.00000000006 


+6+1 


+ + 
1000000006 


100,000 (=10 B ) 


+2-3579 


- + 
3579000002 


35.79- 


+0+0 


+ + 
0000000000 






The second example is —.12345678 times 10 5 . It can be seen from the exam- 
ples that when the power is positive, it represents the number of whole 
number digits; when the power is negative, it represents the number of zeros 
to be placed after the decimal point before the actual number begins. A 
power of zero means that the number is a decimal number just as it is without 
using the power. A true zero is always signed positively. 

Whereas as 705 instructions refer to the contents of a single address, print 
instructions are in a multi-address form. All print operations except FPR 
are performed without rounding, to save operation time. If this should ever 
cause inconvenience, use a system with a longer mantissa. Arithmetic instruc- 
tions which are found to refer to zero operands will operate in accelerated 
fashion, since all operands are first tested for zero in the arithmetic sub- 
routines. 

If an error occurs during execution because of the impossibility of fore- 
seeing certain illegal conditions, an error message will be written on the 
typewriter. The "tinkertoy" appendix provides options for this type-out. 
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If the programmer wishes to conserve memory space he may select the option 
■which types out the letter E followed by a 2 digit code number; referral to 
the manual will tell him the type of error which has occurred. If economy 
of memory is not vital, he may select the option of typing out an expository 
message. Under either option, the actual address of the failing instruction 
is also typed out. Error messages are: 

E01: Division by zero 

E02: Logarithm of zero or a negative number 

E03: Sine and cosine of an angle greater than ±318tt 

E04: Square root of a negative number 

E05: Power overflow (>99) 

E06: Power underflow (<— 99) (only if desired by user) 

E07: Line image overflow 

E08: Too many whole numbers 

E09: Echo check, 0901 error, channel 12 in tape 

E10: Line or HDG won't write correctly 0902 

Ell: Read card error or card punch error 

El 2: Card won't punch correctly 0902 

E13: 0901 error on write tape 

E14: Tape won't read/write correctly 

El 5: End-of-file before read /write tape completed 

E16: Exponential to the base 10 of |ARG| >99 

Exponential to the base e of |ARG| >225.65334 
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Summary of mnemonic codes 



Non- 


ATR 


Alternating TRansfer 


TNZ 


indexable 


BSi 


Backspace tape "i" 


TRM 


operations 


LVE 


LeaVE PRINT 


TRP 




RCD 
RPL 
RPT 


Read a CarD 

RePLace 

RePeaT 


TRU 
TRZ 




RWi 


Re Wind tape "i" 


TXi 




RWR 


Repeat With Reset (PAC1) 






SRi 


Set index Register "i" 


WCD 




TMi 


write Tape Mark on tape "i" 


WHi 




TNi 


Transfer Not testing limit, 


WLi 






augmenting "i" 


XTP 



Transfer on Non-Zero 

TRansfer on Minus 

TRansfer on Plus 

TRansfer Unconditionally 

TRansfer on Zero 

Transfer testing indeX limit, 
augmenting "i" 

Write a CarD 

Write a Heading, space "i" 

Write a Line, space "i" 

eXTract Power 



Special 


ADC 


ADdress Constant 


FLC 


FLoating Constant 


operations 


BLK 


BLocK 


HDG 


HeaDinG 




CON 


CONstant 


ORG 


ORiGin 




DEL 


DELete 


REG 


REGister reservation 




FIN 


FINish 


SAY 


SAY it 



Indexable 


ADD 


ADD 


MPM 


operations 


ART 


ARcTangent 


MPY 




DIV 


DIVide 


PMA 




EXD 


Exponential, Decimal base 


RTi 




EXE 


Exponential, base E (e) 


SAC 




FLO 


FLOat 


SQR 




FPR 


Fix for Printing Rounded 


SUB 




FXP 


FiX for Printing 


TAB 




LGD 


LoGarithm to Decimal base 


TMT 




LGE 


LoGarithm to base E (e) 


TNA 




MAD 


Multiply — ADd 


TRC 




MDV 


Minus DiVide 


TRE 




MMA 


Minus Multiply — Add 


TSC 




MMY 


Minus MultiplY 


WTi 



Minus Polynomial Mult.— add 

MultiPlY 

Polynomial Multiply— Add 

Read Tape "i" 

Sine And Cosine 

SQuare Root 

SUBtract 

Transmit ABsolute 

TransMiT 

Transmit Negative Absolute 

TRansfer on Comparison 

TRansfer on Equality 

Table Search on Comparison 

Write Tape "i" 



21 



Summary of indexable operations 



VARIABLE FIELD 



COMMENTS 



ADD 



0PER 1 , 0PER 2 , SUMM (0PER 1) + (0PER2) 



-*■ SUMM 



SUB 



0PER1,0PER2,DIFF 



(0PER1) - (0PER2) 



-— DIFF 



MPY 



MLPLR, MCAND,PRDCT (MLPLR) (MCAND) 



-— PRDCT 



MMY 



MLPLR , MCAND , NGPRD -(MLPLR) (MCAND) 



-«- NGPRD 



DIV 



DVDND , DVS0R , QU0T ( DVDND) * ( DVS0R) 



-~ QU0T 



MDV 



MAD 



DVDND, DVS0R,NGQU0 -( DVDND) + (DVSftR) 



NGQU0 



MLPLR , MCAND , CRSFT (MLPLR) (MCAND) + ( PAC 1 ) 



CRSFT 



MMA 



MLPLR , MCAND,CRSFT -(MLPLR) (MCAND) + (PAC 1) 



-*- CRSFT 



PMA 



MPM 



SQR 



SAC 



ART 



LGD 



LGE 



EXD 



EXE 



(FSR) 



TMT 
TAB 



TNA 



TRC 



TRE 



TSC 



WTI 



RTi 



FXP 



FPR 



FL0 



ADDND, MCAND, RSULT (ADDND) + (PAC1) (MCAND) 



RSULT 



ADDND , MCAND , RSULT (ADDND) - (PAC 1) (MCAND) 



-~ RSULT 



SXTY4 / EIGKT 



-V(SXTY4) 



EIGHT 



ANGLE, SINE, C0SIN sin (ANGLE) *-SINE, cos (ANGLE) -- C0SIN 



TNGNT, ANGLE 



tan" 1 (TNGNT) 



-*~ ANGLE 



NUMBR , DECLG 



log 10 (NUMBR) 



-»- DECLG 



NUMBR, NATLG 



log, (NUMBR) 



NATLG 



EXP0N,TEN2X 



EXP#N,E2THX 



antllog (EXP0N) 



TEN2X 



antilog (EXP0N) 



-*- E2THX 



ARGUM, RSULT 



function (ARGUM) 



-*- RSULT 



HERE , THERE 



( HERE) 



-*■ THERE 



MINUS, PLUS 



|( MINUS i 



PLUS 



PL/MN , MINUS 



|(PL/MN)| 



MINUS 



TRADD, THIS, THAT 



Transfer Jo TRADD If (THIS) * (THAT) 



TRADD , THIS , THAT 



Transfer to TRADD if (THIS) - (THAT) 



* A, TABLE, ARGUM 



Search argument table for first number - (ARGUM), be- 



ginning at TABLE. f( TABLE) is ± A word lengths oway. 
BEGIN , ENDD , TRADD, TM Write all successive words from BEGIN to ENDD, Inclus- 



ive, as 1 record on tape i . Transfer to TRADD If end-of- 



file Is reached, write tape mark If TM Is written. 



START , TRADD 



Read record from tape i , filling as many successive locat- 



lons as on record, beginning with START. Transfer to 



TRADD if a tape mark Is encountered. 



FLNUM,t,wW,dD,s 



Fix (FLNUM) x 10 s for print in line Image, decimal point 
In type wheel t, with w whole numbers and d decimals. 



FLNUM, t, wW, dD,s Same as FXP, except round the number when fixing. 



C0LXX , n , R/L s , FLNUM Take the n digit number with units position In column XX. 



Move the decimal point R(lght) or L(eft) s positions. Put 
In floating point format In FLNUM. 
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Summary of non-indexable operations 



OPERATIC* 
CODE 

11- -13 


VARIABLE FIELD 
14 - 


COMMENTS 


TRZ 


TRADD , TEST 


Transfer to TRADD if (TEST) are zero 


TNZ 


TRADD , TEST 


Transfer to TRADD if (TEST) are non-zero 


TRP 


TRADD , TEST 


Transfer to TRADD If (TEST) are plus 


TRM 


TRADD, TEST 


Transfer to TRADD if (TEST) are minus 


TRU 


TRADD 


Transfer to TRADD unconditionally 


RPL 


ADDR1 , INSTR 


Replace the 1st address in INSTR by ADDR1 


XTP 


FIRST, SECND 


Give (SECND) the same power as (FIRST) 






SRI 


±n,± Urn 


Set contents of R, to ±n, limit to ± Urn 


TNI 


TRADD , ± A 


Augment Rj by ± A , transfer to TRADD 


TX! 


TRADD , ± A 


Augment R, by ± A, transfer to TRADD only if 




new (Rj) < llmj . Otherwise proceed. 






RPT 


n,±!,±I,±k 


Repeat (perform) the next instruction n times, index- 




ing its 1st, 2nd, and 3rd addresses, as they exist, 




by i , | , and k words lengths respectively. 


RWR 


„,±I,±l,±k 


Reset PAC1 to zero, then operate same as RPT. ±1, 




± { and ± k may all be prefaced in RPT and RWR 




by an * to indicate Indexing by number of char- 




acters, not word lengths. 






LVE 


TRADD 


Leave PRINT. Next instruction is next 705 instruct- 




ion if TRADD is not written, TRADD if written. 


BSi 


n 


Backspace tape i for n records. 


RWi 


Rewind tape i . 


TMI 


Write a tape mark on tape i . 


WLi 


UNIT, n, TRADD 


Write a line. UNIT Is tape t or printer. 1 is the 




space control after writing, n, TRADD is optional ) 




Write n lines, transfer to TRADD rather than 




write the (n+l)th line. 


WH! 


UNIT, n, TRADD 


Write a heading. ( Equivalent to WL 1) . 


WCD 


UNIT 


Write a card. UNIT is either tape t or punch. 


RCD 


UNIT, TRADD 


Read a card. UNIT is either tape t or printer. 




Transfer to TRADD on end-of-file condition. 




(Optional specification of TRADD). 
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Indexable computing operations 



Arithmetic operations 

These operations are largely self-explanatory from the operation summary 
preceding this section. It should be noted that MAD, MMA, PMA and 
MPM are compound, or double, arithmetic operations, although they are 
still written with only three positions in the variable field. The understood 
operand is always the contents of PAC1, the primary pseudo-accumulator. 
Although these accumulative operations may be used singly, their design 
purpose is for repetitive arithmetic. As such, the result of each operation may 
be found in PAC1 as well as in the normal result address. The Multiply- 
ADds are designed for vector products. The Polynomial-Multiply-Adds are 
designed for evaluation of polynomials with the argument addressed in the 
second position. Although no index register modification is shown in the 
summary, all of these operations may have a sub-position for each address, 
indicating this. 



Mathematical function operations 

These operations are also self-explanatory. SAC (Sine And Cosine) is the only 
operation with three positions in the variable field, all others having two 
positions. Each position may have a sub-position for index register indication. 
The first position address for all of these operations is that of the argument. 



Data transmission operations 

TMT (TransMiT), TAB (Transmit ABsolute), and TNA (Transmit Nega- 
tive Absolute) are operations for moving blocks of data from one group of 
locations to another. The address in the first position of the variable field 
is that of the original location; the address in the second position is that of 
the location to which the data is moved. Both positions may have sub-positions 
for index register modification. Unless PAC1 is specified in either position 
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it will be unaffected by the transmittal. Unless destroyed by a later operation, 
the original contents will be unaffected. TAB guarantees that the contents 
will be positively signed in the new location, TNA that they will be negatively 
signed. The first example shows the 40 numbers in locations M001 through 
M040 being transmitted in a reverse fashion, with a blank location between 
each number, to the locations P080 down to P002. The second example shows 
that ANY word-length block of characters may be transmitted by use of 
this instruction. 



LOCATION 
6- .10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD COMMENTS 
14- -80 


BLNK S 


C0N 


(word length) 


P080 ! 


REG 


P001 




ENT 






RPT 


40. 1,-2 




TMT 


M001, P080 




TMT 


BLNKS, AREA 



Comparison transfer operations 

TRC (TRansfer on Comparison) and TRE (TRansfer on Equality) are 
conditional transfer instructions which make an algebraic comparison of 
two operands. They are written with three positions in the variable field, 
the first of which is the address to be transferred to if the condition is met. 
TRC takes place when the number addressed in the second position is equal 
to or algebraically greater than the number addressed in the third position. 
TRE takes place only when these two numbers are equal. All three addresses 
may be modified by index registers. 

These operations have special characteristics when preceded by a RPT or 
RWR operation. The number of repetitions may be set at a maximum by a 
positive number or to an indefinite repeat by a negative number in the first 
position of the RPT instruction. In either case, transfer may occur before 
the repeat tally is reduced to zero in normal fashion. The tally is therefore 
automatically reset to zero on a transfer. Considering for purposes of iden- 
tification that the general instruction is: 

TRC/TRE TRADD, THIS, THAT 
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transfer to TRADD will occur when the contents of THIS, as indexed by the 
RPT, are greater than or equal to the contents of THAT, as also indexed. 
When the transfer occurs, the following quantities are left in specialized 
symbolic locations: 

Location Contents 

ARG1 (working position) Last THIS used 

ARG2 " " Last THAT used 

LAR1 (Location of ARG1) Address of last THIS used 

LAR2 (Location of ARG2) Address of last THAT used 

LAR1 and LAR2 are usable only by the RPL operation. Using LAR1 or 
LAR2 as an address in any other instruction will cause an error message in 
pre-edit. None of these special addresses is indexable by either index registers 
or RPT or RWR instruction increments. Their index indicators are automat- 
ically set to zero by pre-edit. RPT or RWR increments, if used, must be coded 
as zero by the programmer or a machine stop will occur. When TRC or TRE 
is used with RPT or RWR the second position in RPT or RWR, which would 
normally be considered to modify the transfer address, must be coded as 
zero by the programmer or a machine stop will occur. Although TRC and 
TRE are indexable instructions, transfer addresses are obviously not index- 
able in a system using variable length instructions. 



Table search operations 

TSC (Table Search on Comparison) is a special variation of TRC which is 
especially designed for fast and flexible table search. Rather than a transfer 
address, the first position in the variable field contains the differential number 
of word lengths between the arguments of the table and the corresponding 
functions of these arguments. No transfer is made after TSC; the next 
instruction in sequence is executed. 

A special RPT or RWR instruction must precede TSC. The first position 
contains a negative number for indefinte repetition. The second and fourth 
positions must contain zeros. The third position contains the interval of 
gross search. Table Search automatically consists of two parts. Letting N 
symbolize the gross search interval, the first part compares the first argument 
and successive arguments in intervals of N against the test argument. When 
one of these is found to equal or exceed the test argument, the search auto- 
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matically backs up to the previous grouped argument. The second part of 
the search consists of a comparison of successive arguments in this localized 
area against the test argument in intervals of one. N may be the integer 1 or 
any other integer, PROVIDED that the number of arguments in the table 
equals (some multiple of this integer plus one). For example, consider the 
case of a table with 65 arguments. Valid values of N would be 16, 8, 4 and 2. 
The first, 17th, 33rd, etc. arguments would be compared against the test 
arguments if N were assigned as 16. In practice, the most effective interval of 
gross search is that which most closely approximates the square root of the 
number of arguments in the table, in this case, 8. 

Further suppose that the 33rd argument was found to exceed the test 
argument. Comparison is now made to the 18th, 19th, 20th, etc., until some 
argument between the 17th and 33rd is found to exceed the test argument, 
or equal it. When this is found, the Table Search is discontinued and the 
following items are to be found: 

If for any argument X tegt , X n is defined as the first argument greater than 
or equal to X tegt and the previous argument X nl is less than X tist 



Location 
ARG1 

LAR1 

PAC1 

ARG2 

LAR2 

PAC2 



(ARGument 1) 
(Location of ARgument 1) 
(Pseudo- Accumulator 1) 
(ARGument 2) 
(Location of ARgument 2) 
(Pseudo-ACcumulator 2) 



Contents 

x 

Address of X n argument 
Corresponding function f (X n ) 

Address of X n _ l argument 
Corresponding function f (X nl ) 



All of these are useful as addresses, although LAR1 and LAR2 may be used 
only with the RPL operation, and none of the addresses is indexable. 
Caution! Arithmetic operations use PAC1 as a result address, so the contents 
of PAC1 after a TSC will have to be used before any arithmetic operation or 
else transmitted to a temporary location. 

It should be standard practice to make the last argument in any table 
equal to the highest number in the print system (+99-f-999999 ....). This 
dummy number ensures against overrunning the table with an unexpectedly 
high argument. In a table of 398 entries, for example, it would also be very 
practical to make the last 3 entries to be this dummy number, thus increasing 
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the number of arguments to 40 1 and allowing a gross search interval of 20, 
which is the most efficient. 

Let A symbolize the number of words lengths between the table of 
arguments and the corresponding functions. If A were set to zero, PACi 
would not contain the functions of the argument; the contents would be 
identical to the contents of ARGi, which are the arguments again. Sliding 
sets of tables might be constructed with this feature, using a variable A. 
Furthermore, using +A in one case and —A in another permits interchange 
of the dependent and independent variables. 

A standard method of coding is shown in the example, illustrating Table 
Search and linear interpolation, according to the formula: 



f(X 



test/ 



f (Xn-0 + 



f(X„)-f(X n _ 1 ) 
X -X„ , 



( X te»t ~ X n-l) 



LOCATION 
6- -10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD COMMENTS 
14. "80 




RPT 


- 1, 0, (Interval), 




TSC 


A, XSUB l r XTEST 




SUB 


, PAC 2, TEMP 1 f (Xn) - f (Vi ) 




SUB 


XTEST, ARG 2, TEMP 2 X tes t - X^ 




SUB 


ARG 1, ARG 2 *x\ ' ^-1 




DIV 


TEMP 2 (PAC I implied as divisor) 


1 


PMA 


PAC 2, TEMP 1, RSULT - F (X^) 
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Non-indexable computing operations 



Transfer operations 

There are four conditional and one unconditional operations in this group. 
Conditional transfer commands are written with mnemonic symbol and two 
positions in the variable field. The address in the first position is always that 
of the instruction to which the transfer is to be made if the condition is met. 
The address in the second position is that of the number whose condition is 
to be tested. The mnemonic symbols TRZ, TNZ, TRP and TRM signify 
respectively that this condition is to be zero, non-zero, plus or minus. TRU 
signifies that transfer is to be made unconditionally to the instruction whose 
address is in the single position in the variable field. In the example shown, 
the program will operate in normal sequence if the contents of JONES is 
a positive non-zero number; otherwise control transfers to the instruction in 
B006 and proceeds sequentially from there. 



03041 
03042 
03043 



OPERATION 
CODE 



VARIABLE FIELD 



COMMENTS 



II- - 1 3 I 14 



TRZ 



TRM 



SQR 



B006, J0NES 



B00 6, J0NES 



J0NES, SMITH 



Replace operation 



The instruction for this operation is written with the mnemonic RPL 
(RePLace) and two positions in the variable field. This operation causes the 
instruction in the address specified by the second position to have its first 
position address replaced by the first position address of the RPL instruction. 
If the first position address is written "LAR1" or "LAR2" the replacement 
address is not LARi but the address in LARi. This indirect address feature 
is used in conjunction with the TRC, TRE and TSC operations. This 
operation has three other usages. It may be used as a "flip-flop" or sequencing 
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switch, for direct exiting from sub-routines and for command modification 
by replacement rather than by indexing. 

RPL will operate only on the arithmetic, mathematical function and data 
transmission operations, all transfer operations, ATR, FXP and FPR. In 
addition, it will operate on the transfer addresses of the WLi, WHi, RCD, 
WTi and RTi operations, although these addresses are not in the first position 
of the variable field. The example shown depicts the condition of the instruc- 
tion in TEXAS before and after a RPL. Further examples of usage may be 
found in Appendix II. 



LOCATION 



TEXAS 



TEXAS 



OPERATION 
CODE 



II- -13 



MAD 



RPL 



MAD 



VARIABLE FIELD 



C(ftMlC. L SMITH. 2, RSLT3 
CAPS, TEXAS 



CAPS. 1. SMITH. 2. RSLT3 



COMMENTS 



■ 80 



(new form of TEXAS) 



Extract operation 



The instruction for this operation is written with the mnemonic XTP 
(eXTract Power) and two positions in the variable field. The first position 
contains the address of the floating point number whose power is to be 
extracted. The second position contains the address of another floating point 
number whose power is to be replaced by the power extracted from the first 
number. This operation is designed for convergence testing, since in floating 
point the size of a number during the course of calculation may not be pre- 
dicted. The example shown illustrates the programming of a convergence 
test on (JANES), where it is desired that the valid value of (JANES) shall 
not differ from the previous value of (JANES) by more than 3 in the 7th digit 
of the mantissa. The power of (JANES) is assigned to mantissa of .3 in TEST 
and scaled by 10-«. After step CONV2 the number in TEST is the proper 
value for testing for convergence. When the difference between the present 
and previous value becomes le^s than this increment, the iterative loop is 
abridged by the TRC command. Without such an instruction, an oscillatory 
condition in the last digit of an iterated number might make it impossible 
to exit from the loop. It also provides for a less exacting matching than all of 
the digits in the mantissa. An appreciable speed-up of computing time may 
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also be realized in slowly converging operations, if less stringent accuracies 
are made acceptable. 



LOCATION 
6- .10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD COMMENTS 
14- .80 


TEST 1 


FLC 


- 4-3 Power has no significance 


SCAL |E 


FLC 


-5+1 10' 6 


RSTR !T 


TMT 


JANES, SMITH Send old JANES to SMITH 


1 




Compute new value for JANES 


1 

1 




with proper expression 


C0NV1 


XTP 


JANES. TEST 


C0NVJ2 


MPY 


TEST, SCALE, TEST 


C0NVG 


SUB 


JANES, SMITH Differential in PAC 1 


C0Nv|4 


TAB 


Absolute value of differential 


C0NV|5 


TRC 


RSTRT,, TEST To RSTRT if not converged 



Set index register operations 

The instruction for this operation is written with the mnemonic SRi (Set 
Register) and two positions in the variable field. The third character in 
the mnemonic symbol is written 1, 2 or 3, thus specifying the number of the 
index register to be set. It is set to the number of plus or minus word lengths 
in the first position. 

The limit tally of that register is set to the number of word lengths written 
in the second position. If the second position is blank, the limit tally will 
automatically be set to zero. The limit tally is always a positive quantity and 
when converted (by multiplying by data word length, which is 2 plus the 
mantissa length) must be less than or equal to the memory capacity of the 
705 minus 10,000. 



Non-test transfer operations 



The instructions for these operations are written with the mnemonic TNi 
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(Transfer No test ) and two positions in the variable field. The third 
character in the mnemonic symbol is written 1, 2 or 3, thus specifying the 
index register to be operated upon. The first position contains the address 
of the instruction to which unconditional transfer is made after augmenting 
the contents of the index register with the number of word lengths written 
in the second position. This transfer address will, in many cases, merely be 
the next instruction. The increment for the index register may be either plus 
or minus; the minus sign is written before the number and no sign is written 
for plus numbers. 



Test transfer operations 

The instructions for these operations are written with the mnemonic TXi 
(Transfer testing indeX ) and two positions in the variable field. The third 
character in the mnemonic symbol is written 1, 2 or 3, thus specifying the 
index register to be operated upon. This operation functions in the same 
manner as TNi except that the transfer (to the instruction whose address is 
specified in the first position) is nullified if the contents of the index register, 
as now incremented, are equal to or greater than the limit tally previously 
specified. If this is so, the program does not transfer but rather proceeds to 
the next instruction in sequence. 



Repeat operations 

The instructions for these operations are written with the mnemonic RPT 
(RePeaT) or RWR (Repeat With Reset) and four positions in the variable 
field. RWR is equivalent to RPT except that PAC1 (the primary pseudo- 
accumulator) is reset to zero. A RPT signifies that the next instruction in 
sequence is to be repeated (i.e. performed) the number of times specified 
in the first position of the RPT. This instruction is to be performed as 
written the first time, but for each repetition the numbers or addresses in the 
first, second and third positions of that next instruction are to be additionally 
augmented by the numbers respectively in the second, third and fourth 
positions of the RPT. If the next instruction does not have a third address, 
it is not necessary to specify a fourth position for RPT. 

RPT and RWR apply only to the next instruction, not to any sequence 
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of instructions. Their purpose is to both minimize the number of instructions 
written by the programmer and reduce operating time on repetitive instruc- 
tions. This is accomplished by letting the executive routine know in advance 
that the next instruction is repetitive so that interpretation and command 
fabrication is performed only once. 

Indexing by RPT is secondary and subordinate to indexing by the 
contents of index registers and the simultaneous use of both is possible. All 
four positions of the variable field may be written as 1 or 2 digit numbers 
and all may be signed both plus and minus. The first position, however, is 
normally plus, for when it is signed minus it indicates indefinite repeat and 
as such must be used with caution. Indefinite RPT is designed to be used 
with the TRC, TRE and TSC operations. When an exit is made for any of 
these, the repeat tally is automatically reset to zero so as not to influence the 
next instruction in sequence. A leading asterisk in any of the second through 
fourth positions indicates that incrementation will be by that integer number 
rather than by that number of word lengths. This is mainly used for indexing 
the card column on FLO and the decimal position in the type wheels for FXE 
All indexable instructions and only indexable instructions are repeatable. 
Each of these interrogates the number in the first position (serving as a count) 
before storing the result. If this is non-zero, the count is reduced by 1 and 
the operation is automatically repeated with further indexing by the RPT 
increments. If is it zero, it signifies either that the instruction was not intended 
to be repeated or that it has been performed for the last time. In either case, 
the program proceeds to the next instruction in sequence. For the MAD, 
MMA, PMA and MPA instructions, a special condition exists under RPT 
control. If the address to which the result is sent is not indexed by the RPT, 
the result is stored intermediately in PAC1 only, and not sent to the result 
storage until the repeat tally is zero. 

Advantage may be taken of the fact that RPT and RWR do not alter the 
contents of PAC1. The following example illustrates the calculation of 

/A\ n n being an integer, which result is then available in PAC1. 



S3 



TEMP 



OPERATION 
CODE 



REC- 



ENT 



DIV 



RPT 



MPY 



VARIABLE FIELD 



COMMENTS 



L0CA. L0CB, TEMP 
ind) 



TEMP 



Switching operation 



The instruction for this operation is written with the mnemonic ATR 
(Alternating TRansfer) and two positions in the variable field, each of which 
is tagged. In operation, an unconditional transfer is made to the address in 
the first position each time the instruction is executed, up to the number of 
times designated by the tag for that position. After this limit is reached, 
succeeding executions of this instruction cause unconditional transfer to the 
address in the second position, up to the number of times designated by its 
tag. The instruction then reverts to the original condition for further alter- 
nation as required. Execution is dynamic and it is impossible to return to 
the initial condition without performing the entire cycle; thus a conditional 
transfer exit from the cycle destroys the utility of the ATR unless the program 
is read in again to restore the initial conditions. 

Tags for both positions are unsigned positive numbers, from 1 to 400. 
A zero is an illegal tag for which pre-edit will substitute a 1. For purposes of 
counting only, this operation is generally more efficient than using index 
registers with their transfer instructions. 

The first example shows the preferable, but not the only, method for 
executing n times the routine commencing with the operation in the address 
"START". The second example illustrates a method for simulating the 
general extended case when the desired tags for both addresses exceed the 
limit 400 and are not prime. 



34 



LOCATION 
6- -10 


OPERATION 
CODE 

tl- .13 


VARIABLE FIELD COMMENTS 
14- .80 


star It 




















ATR 


START, (n-1), NXTCM. 1 


NXTCM 


















STAR IT 


atr 


FIRST, a, SECOND, c ^ 


simulates: 


firs It 


1 

1 








1 
1 




ATR FIRST, ab. SECND, cd 




ATR 


FIRST, (b-1), START, 1 




SECN ID 


1 

1 




WHERE: 




1 

1 




ab>400 r NOT PRIME 




ATR 


SECND, (d-1), START, lJ 


cd>400. NOT PRIME 



Generating print instructions 

As programmers become more experienced in using the print system, the 
translation charts on pages 5 1 and 52 will become increasingly useful. Print 
instructions, due to their variable length and specialized format for maximum 
operating speeds, may not be modified directly except by indexing. Very often 
specific coding for a problem will depend upon parameter values. An 
excellent example of this is the martix inversion kernel in Appendix II. 
Rather than recode the problem each time for a different order of matrix 
and a different number of column vectors, it would be advantageous to have 
705 instructions preceding the general coding which would generate the 
necessary variable portions of the print instructions, given only the values 
of n and b. To do this, the structure of the translated print instructions 
must be known. 

As an example, consider the tape instructions RTi and WTi, which are 
specifically designed to operate with print data words in fixed lengths. The 
coding kernel below shows how to make use of these same instructions to 
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write and read irregular blocks of memory on tape, taking advantage of the 
error-correction routines contained in these print instructions. The record 
as formed is illustrated below: 



lieu 


IBI 


gui r 


Ml* 


n 


JUII 


J Y 


AJIl 


7 




H 












p 


+ 1 


position-^ 


X 


X 


x |x 


x 


X 


X 


X 


P 


P | | 




M 




X 


X 


X 


X 


X | X 


X 


X 


p IM i 


o» 
1 

D 




to 

LLI 

Z 

o 












D 


1 


V 


















I 

1— 



LOCATION 
6- -10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD COMMENTS 
14- -»° 


J0NES 


BLK 


3 




I 
( 




SMIT IH 


BLK 


5 


BR0w|N 


ADC 


J0NES - 2 a - 9 portion 


BLAC JK 


ADC 


SMITH +1,9 p + l portion 




L0D 


BR0WN , 4 




UNL 


PUTT + 12,4 




UNL 


TAKE + 12,4 




L0D 


BLACK ,4 




UNL 


PUTT +16,4 




ENT 




PUTT | 


WT8 


0000 , 0000 Zeros are dummy addresses, later replaced 




i 
1 




TAKE 1 


RT8 


0000 Zeros are dummy addresses, later replaced 
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Fixed symbolic locations 



Actual location for the fixed symbolic data words defined on page 4 are: 

Address of right-hand digit 
Mantissa: 8-digit 10-digit 12-digit 

PACl 0254 0256 0258 

PAC2 0244 0244 0244 

ARG1 2439 2441 2443 

ARG2 2449 2453 2457 

LAR1 2044 2044 2044 

LAR2 2019 2019 2019 

In addition, all line, heading and card image positions are considered fixed 
symbolic locations if addressed as: 

TWxxx TW stands for type wheel, xxxforOOl to 120 

HDxxx HD stands for heading, xxxforOOl to 120 

C0Lxx C0L stands for column, xx for 01 to 80 

Locations of these images are: 

LINE 3265-3385 Address=TW+3265 

* 3386 

HDG 3387-3507 Address=HD+3387 

* 3508 

CARD 3509-3588 Address=C0L+35O8 
£ 3589 

The position referenced in the coding is considered as: 

1. BADD for print data words as called for in print instructions. 

± ± 
xxx. . . .xxx PP Pre-edit must make conversions of BADD 

as required for the several types of print instructions. 

2. The addressed character for 705 commands. 

Examples: UNL C0LO6=UNL (3271) 
ST TW086+4, 15 

Image addresses must contain all five characters. In the above examples, 
C0L6 or TW86 would not be allowable. 



37 



Input— output operations 



Printing operations 

Much emphasis has been placed, within the print system, upon ease of 
entering data and recording results. Both on-line and off-line operations are 
equally feasible. There are several operations especially designed for sim- 
plified control of printed output. 

FXP (FiX for Printing) and FPR (Fix for Printing Rounded) are index- 
able operations which will convert the floating point number in a specified 
address to a fixed decimal condition and store it in the specified position in 
the line image in memory just as it should be printed. 

The variable field of these instructions consists of the address of the 
number to be converted, index tag (if any), a 1 to 3 digit type wheel position 
for the decimal point, a 1 or 2 digit maximum number of expected whole 
numbers and a W, the number of decimal positions and a D, and a 1 or 2 
digit power of 10 by which the number is to be scaled. The last position 
should be left blank if there is no scaling. (The heading should note this 
scaling if it exists). Typical commands and results are: 

FXP JONES, 28, 2W, 10D, -2 . . . . 123456787803 bl. 2345678780b 

FPR G116, 13, 9, 4W, 2D 438692617804 4386.93- 

FPR G116, 3, 4W, 2D 438692617804 86.93- (ERROR) 

In the first example, 2, 20, and +20 would have been acceptable as scale 
factors. The error shown is due to calling for 4 whole numbers to the left 
of type wheel 3. Similar errors can occur by exceeding type wheel 120. Only 
the address in the first position is modifiable by index registers. Both the 
address and the type wheel position are modifiable by RPT or RWR. An 
example is shown where more than one number is converted to the same 
specifications; this will occur quite often in matrix output. In the example, 
(R0WO1) are fixed with the decimal point in type wheel image 8, 
(R0WO1 + 1) with the decimal point in type wheel image 19, etc., thus using 
only three instructions to convert the entire line and print it. 0W and 0D 
must be used to indicate absence of either whole numbers or decimals. 
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6- -10 



OPERATION 
CODE 



RPT 



FXP 



WLS 



VARIABLE FIELD 



COMMENTS 



8. l f *11 



R0WO1, 1, 8, 1W, 6D 



PRINTER 



There are many combinatorial instructions for output control, as illustrated. 
All are non-indexable. Either the printer or a tape unit may be specified 
in the variable field. Either the full word description or the initials P or T 
may be used. An asterisk as the preceding character signifies a fast skip 
under carriage tape control. 

Both on-line and off-line printers must be set to program control to use 
the print i system. Except for special skip instructions, there should be a 
punch in only channel 1 of the carriage tape; a channel 12 punch is illegal 
and will cause an error message. All carriage control should be built into the 
program to eliminate most tape-changing. 

Headings are put into the heading image with the HDG entries; for 
multiple usage of heading in a single run, reserve extra positions for heading 
components in memory with CON operations, and transmit these to the 
heading image as required. When a line is written successfully, without echo 
checks or other errors, the line image is erased to blanks. This allows a 
flexible line format, as the programmer makes provision for positioning only 
those numbers which he wishes to print, regardless of the make-up of the 
previous line. Card and heading images are NOT erased after writing. 



WLN 


PRINTER 


Write a Line - No spacing 




WLS 


PRINTER 


Write a Line - Single spacing 




WLD 


TAPE 4 


Write a Line - Double spacing 




WHD 


T 7 


Write Heading - Double spacing 




WHT 


P 


Write Heading - Triple spacing 




WL 2 


TAPE 7 


Write a Line - Skip to channel 2 punch 




WH4 


* TAPE 8 


Write Heading - Fast skip to channel 4 





These operations may have counting transfers added by using two more 
positions in the variable field. The second position is a 1 or 2 digit number 
specifying the number of times the write line or heading operation is to be 
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executed, up to a limit of 98. The third position contains the address of the 
instruction to which control is to be transferred when writing is attempted 
after the limit is reached. This transfer restores the initial condition of the 
instruction so that the same process may be repeated. The following example 
shows the control operations for writing 20 pages, each with a heading and 
50 lines of answers, grouped in 5 groups of 10. 



LOCATION 
6- -10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD COMMENTS 
14- -80 


HEAD 1 


WHT 


T6, 20, PAGES PAGES, LINES and LASTL are used 


C0MPJU 





as convenient mnemonic names for 




WLS 


T6, 9, LINES the associated instructions. The first 




TRU 


C0MPU line therefore reads '. 


LINE JS 


WLD 


T6, 4, LASTL 




TRU 


C0MPU "Write a Heading, Triple space, 


LAST IL 


WLI 


T6 on Tape 6 - write 20 PAGES. " 




TRU 


HEAD 


PAGE JS 





(continues computation after 20 pages are written) 



Tape data storage operations 

VVTi (Write Tape ) and RTi (Read Tape ) are indexable operations 
provided for storage and retrieval of data words on tape, which is essentially 
a function of increasing memory capacity. The third character of the 
mnemonic symbol is the dial setting of the tape unit addressed. WTi is 
written with two positions in the variable field, each of which may have an 
index register tag. These positions contain the first and last addresses of a 
consecutive series of words in memory which are to now constitute a record 
on tape. RTi is written with one position in the variable field, which is the 
starting address in memory for reading one record from tape. As many words 
will be replaced in memory as the record itself contains, so the programmer 
is cautioned to know the pattern of his tape operations very thoroughly, to 
avoid destruction of wanted data. Discretion should also be maintained in 
using these instructions with the 4 tape units normally associated with 
pre-edit and library. 

It is possible to add other positions in the variable field of WTi and RTi. 
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The third position may be a transfer address or the two letters TM. The 
fourth position must be TM, and exist only if there is an address in the third 
position. The transfer address of WTi is that of a sequence of instructions 
defining procedure in case the physical end of tape is reached before com- 
pleting the write instruction. TM puts a tape mark as the next record after 
completion of writing. The transfer address of RTi is that of a sequence 
of instructions defining procedure in case where the record consists of a tape 
mark written by a WTi. 



LOCATION 
6- .to 


OPERATION 
CODE 

II- -13 


VARIABLE FIELD 
14- 


COMMENTS 
-an 




WT6 


B001, B020 




WT6 


B001, 1, B020, 12, PATCH 




WT5 


G136, 1, G136, 12. TM 




RT5 


RAND 




RT9 


FIRST, TR0UT 




BS8 


20 


(backspace taDe 8 bv 20 records^ 




RW8 


(rewind tune ffi 




TM8 


(wrlfe a tape mark on tape 8) 



BSi (Backspace tape ) and RWi (ReWind tape ) are non-indexable 
operations for positioning records to be read or written. In the variable field 
of BSi is written the number of records to be backspaced. This is a 1 to 3 
digit number; the programmer may not specify more records than exist on 
the tape from that point back. RWi has no information in the variable field, 
nor does TMi, which is a separate instruction for writing a tape mark 
unconnected with other operations. 



Card operations 



The card image in memory is used for both reading and punching. Special 
facilities are provided for reading both floating point and fixed point data, 
but punching is restricted to floating point form unless special handling is 
made in 705 language. This is based on the assumption that actual punched 
cards will be produced for local re-loading only, in which case there is no 
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purpose in refloating data which may be had already in floating form. 
Suggested floating point loader cards are as follow: 



8 digit mantissa 
10 digit mantissa 
12 digit mantissa 



8 words per card 
6 words per card 
5 words per card 



addressed at 10(10)80 
addressed at 20(12)80 
addressed at 24(14)80 



The card for the 8 digit mantissa may be reduced at option to 7 words, thus 
allowing the first 8 columns in any system to be indicative information. For 
fixed data, there is no specified format and commands are so designed that it 
is not necessary. Typical movement of data and production of a punched card 
might be: 



OPERATION 
CODE 



VARIABLE FIELD 



COMMENTS 



RPT 



7, U*10 



TMT 



A001 f Q6L20 



WCD 



T4 



WCD (Write CarD) and RCD (Read CarD) are operations for reading and 
writing 80 character records. Reading may be from either the card reader 
or a numbered tape unit, and this is written in the variable field. Writing 
is onto either the punch or a numbered tape unit, and this is specified 
in the variable field. The use of tape for these operations is designed 
for peripheral equipment, although it is another method of temporary data 
storage in fixed decimal format. The unit in the variable field may be written 
with the full name or the initials T, P or R as required. The transmission 
to or from the card image in memory is implicit in all of these instructions. 
The second position of RCD is a transfer address for an end-of-file condition. 
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LOCATION 
1- -10 


OPERATION 
CODE 

II- -13 


VARIABLE FIELD COMMENTS 
14- -80 




WCD 


TAPE 8 




WCD 


PUNCH 




WCD 


P 




RCD 


T6 




RCD 


READER, TRADD 



FLO (FLOat) is an operation for converting a fixed point number of any 
specified length to floating point form, thus making it suitable as an operand 
in the print system. It is written with these four positions in the variable field: 

1. The symbolic address of the units position of the number to be converted. 
This will most often be C0Lxx. A sign for this number must exist over 
the units position for negative numbers only. 

2. The number of digits comprising the number. Must be <2 mantissa lengths. 

3. The direction (L or R) for shifting the decimal point to put it in the true 
position and the number of places to shift, considering the number to be 
originally comprised of whole numbers. (See examples). For no shift, either 
LO or RO must be coded. 

4. The symbolic location where the number is to be stored after conversion, 
with an index register tag if required. 

Only the address in the fourth position is indexable by the contents of index 
registers, but both it and the address in the first position may be indexed by 
a RPT instruction. The first position address will most commonly be C0Lxx, 
and the RPT increment will most commonly be asterisked to indicate num- 
ber of character positions rather than word lengths. The indications in the 
comments field of the examples show the true decimalization of the numbers. 
The third example is a program for reading in 200 pieces of 4 digit data for 
processing, condensed for loading purposes on 10 cards. When converted to 
floating point form, the data words occupy print memory addresses A001 
to A200 inclusive. 
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SERIAL 
1- -5 


LOCATION 
6- .10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD COMMENTS 
14- -80 




1 


RPT 


4,1,1 




1 
| 


FL0 


FXWRD , 6 , R2 , 1 N PUT , 3 XXXXXX00 . 




1 
1 


RPT 


6,*5, 1 




1 

1 


FL0 


C0L48 , 5 , L2 , TAX4 XXX. XX 




1 
1 






01010 


A200 j 


REG 


A001 


01020 


1 


SRI 


0,200 


01030 


RDATA 


RCD 


READER 


01040 


1 
1 


RPT 


20, *4, 1 


01050 


1 
1 


FL0 


C0I_O4,4,L3,AOO1,1 X.XXX 


01060 


1 

i 


TX1 


RDATA , 20 



Pre-edit and system entry 



If a system tape does not exist by virtue of previous usage of the print i 
system, operations are commenced by placing the print i program deck in the 
card reader, followed by symbolic cards for the program to be pre-edited. 
The system is then initiated from the console by: 



1. Clear memory 

2. Place in manual instruct status 

3. Select the card reader 

4. Read into lowest memory position 

5. Depress the start key 



Addres 


s selector 


Typewriter key 


0100 




2 


0000 




Y 



After loading these cards, the print i system will be on tape 0200, in 9 sections: 



1. System control 1 

2. Memory print (13 records) 

3. Tape print 

4. First pass of pre-edit 

5. Intermediate pass of pre-edit 



6. Last pass of pre-edit 

7. System control 2 

8. print i executive routine 

9. Non-standard library 
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If a system tape does exist, it is loaded on tape 0200, and the system initiated 
from the console by: 

1 . Clear memory Address selector Typewriter key 

2. Place in manual instruct status 

3. Select the system tape unit 0200 2 

4. Rewind the system tape 0002 3 

5. Turn off IOF 0000 3 

6. Read into lowest memory position " Y 

7. Depress the start key 

Programs may be pre-edited from card, tape or combined card and tape input. 
Tape input will be on 0202 if Alteration Switch 0915 is OFF, on 0203 if it is 
ON. The combined card and tape input feature exists for purposes of repair- 
ing programs. Steps may be inserted or deleted by change cards. A complete 
reorganization of the program within memory takes place every time this 
is done. 

Pre-editing starts with system control 1 and proceeds to the first pass. 
Card and tape input are checked for sequence and merged on serial number 
(col. 1-5 of the card). When the serial of a card matches that of a card image 
on tape, the card record replaces that tape record unless the card carries the 
mnemonic operation code DEL (DELete). In this case, that record is deleted 
and so are all subsequent records up to and including the record whose 
serial is punched in the variable field of the DEL card. Tape records having 
DEL for operation and DEL cards without matching tape records are both 
deleted. Non-DEL cards whose serials do not match with any card images 
on tape are collated with them. 

The output of the first pass is on 0202 or 0203. Records contain the actual 
locations of the instructions. Other conversion is deferred until the last pass. 
In the event that the assignment table overflows available memory, the over- 
flow blocks will be on 0201. The intermediate pass is executed only when 
3 or more overflow blocks occur; this pass finds actual addresses for the 
symbolic addresses referring to the overflow blocks. When there are 3 or 
less blocks of the assignment table yet to be searched, the last pass is called 
into memory for operation. This last pass completes conversion of the 
mnemonic intructions, writing: 

1. A program tape on 0201, consisting of actual 705 instructions and converted 

pseudo-instructions. If Alteration Switch 0913 is ON, standard 705 load cards 
will be punched for reloading by card rather than the 0201 tape. This is 
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suitable for short programs, or where a permanent record of the program is 
desired for storage in a more flexible medium. This should be done only 
when the program is known to be correct and working. 

A master symbolic tape on 0203 (or 0202 for referrals > 1000) which contains 
the corrected and updated program in symbolic form, just as the original 
punched cards were. This is suitable as input for re-editing and further cor- 
rection. The selection of either 0203 or 0202 as the proper input tape for 
re-editing is automatic. A concluding typewriter message will indicate the 
correct location of tapes. 

A listing tape on 0202 (or 0203 for referrals > 1000) which is the permanent 
record of coding, pre-editing and assembly of the program. If Alteration 
Switch 0914 is ON, the listing will be written on the line printer during the 
pre-edit process, in which case this tape need not be saved unless more copies 
are desired. If the switch is OFF, the availability of an auxiliary printer is 
normally assumed. For both printing methods, time will be lost if the com- 
ments exceed 25 characters, since an extra line will be printed just to accom- 
modate the overflow. Comment characters above 50 will not be printed on 
this listing. 

If the program is to be executed without pre-editing, Alteration Switches 
0911 and 0912 are both OFF, thus diverting to system control 2. Alteration 
Switch 0913 is then interrogated. If it is ON, the edited program will be 
read from punched cards; if it is OFF, the program will be read from tape 
0201. The combination of both card and tape input is not possible here. 
System control 2 reads the edited program and the executive routine into 
memory, activating a typewriter message calling for setting Alteration Switches 
for the program to be executed and stopping on HLT 1111. Depressing the 
start key will cause execution of the program starting at the first instruction, 
which is either a 705 instruction or the compiled ENTer instruction in 
print. If the 0902 indicator is turned on, loading is in error. Press the 
start key to reload from tape. Cards must be reloaded; reset, start and read 
again. Pre-edit will blank unused memory before reading in the program. 
Memory print and tape print routines are incorporated in the system tape. 
They are called into use by setting Alteration Switch 0916 ON and depressing 
the reset and start keys. A typewriter message will give instructions for next 
setting of 0916 (OFF to bypass memory print). The tape to be printed is 
selected by setting Alteration Switches 0911 thru 0914 in a binary represen- 
tation of the units position of the tape unit desired, as: 
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Alteration switch 


Value 


if 


ON 


Value if OFF 


0911 


8 









0912 


4 









0913 


2 









0914 


1 










For example, if 0912 and 0914 were the only switches ON, it would signify 
that tape 0205 would be printed, as 4 -)- 1 = 5. Configurations which sum 
more than 9 are in error. Printing of the tape selected continues until a tape 
mark is sensed or operation is changed to manual. Tapes may be selected and 
printed successively but in any order, by changing the Alteration Switch 
configuration and depressing the start key each time. The return to system 
control 1 is effected by turning 0916 OFF, reset and start. 



Pre-edit conversion 

Two types of addresses are recognized by pre-edit. The basic address of a 
floating point data word is that of its highest (or right-hand) memory position. 
Pre-edit allocates memory in (m -\- 2) modules, where m is the mantissa 
length. FLC and REG are the two operations which cause memory to be 
reserved this way. 

The basic address of a print pseudo-instruction, which is of variable 
length, is that of its lowest (or left-hand) memory position. BADD = (the 
basic address of the previous instruction) + (the length of the previous 
instruction), since they are normally obeyed in order of ascending memory 
position. 

When either REG or FLC is encountered by pre-edit, a test is made to 
see if the previous instruction was either REG or FLC. If not, (and a previous 
ORG falls in this category), the location counter leaves a blank preceding 
the entry to insure definition of a numeric field. If an initial origin is supplied 
in the program it will take precedence over the standard origin supplied by 
pre-edit, which follows immediately after the executive and loading routines. 

The typewriter may operate during pre-edit to send error messages about 
system restrictions which have been ignored in coding. Each message is iden- 
tified with the serial and symbolic location of the erroneous instruction. Some 
of these are for: 

RPT or RWR tally > 99. 
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2. Non-repeatable instruction following a RPT or RWR. 

3. Actual address for 705 instructions TR and 00 TMT not ending in 4 or 9. 

4. Infraction of rules for symbolic or actual location addresses. 

5. Minus index limit for any register, or a converted limit > (memory— 10,000). 

6. More than 2 HDG cards. 

7. Problem overflows memory. 

8. Non-PRiNT or non-705 operation codes. 

9. Attempting to increment non-indexable address (i.e. PAC1, PAC2, etc.) 

10. ATR tally greater than 400. 

11. Non-indexable entry tagged (i.e. PAC1, decimal location in FLO, etc.) 



There may be instances when the programmer has a definite and legitimate 
purpose in ignoring these restrictions. Error messages do not necessarily 
indicate that revision must be made; they exist to warn the programmer 
to be certain that this was his true intent. 

When a floating sub-routine symbol is coded, the pre-edit knows that the 
symbol has no assigned operation code number in the table of correspondence. 
The operation code for all floating sub-routines is assigned to it (this code 
comes from the last two digits of the address of the first instruction in the 
FSR area). Pre-edit automatically compiles the 705 instructions necessary to 
bring the proper sub-routine (if it exists on the library tape 0200) into the 
floating position in print during the course of computation. Such a linkage 
is compiled only the first time that function is needed, or if another function 
has superseded it before it was to be used again. The criterion for compiling 
the linkage is thus change of requirement only. If only one non-standard sub- 
routine is used for a particular problem, the net effect is as though it were 
a permanent component of the executive routine in memory. 

No floating sub-routines will be furnished with this manual. They are 
primarily the responsibility of the user, although IBM will distribute any 
routine contributed. The "tinkertoy" appendix in the supplement will show 
various means of extending this feature so that the programmer may specify 
the amount of memory he is willing to expend for floating sub-routines. 
Replacement would then be set up only if the desired sub-routine exceeded 
in size the amount of available specified memory left. 
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Summary — System operation 



Tape Assignments 



0200-System Tape 
0201— Actual Program 



0202-Listing 
0203-Symbolic (updated) 

Alteration Switches 



Function 


Operation 


0911 


0912 


0913 


0914 


0915 


0916* 


INPUT 


Card and tape 0202 
Card and tape 0203 
Card 

Tape 0202 
Tape 0203 


ON 

ON 

ON 

OFF 

OFF 


ON 
ON 
OFF 
ON 

ON 






OFF 
ON 

OFF 
ON 


OFF 
OFF 
OFF 
OFF 
OFF 


OUTPUT . . 


. On-line printer listing 2 
On-line punched program 2 








ON 


ON 








Memory and tape print" 
Memory print only* 
Tape print only 5 


8 
8 


4 
4 


2 
2 


1 

1 




ON-(ON) 

ON-ON 

ON-OFF 


PROGRAM . 


. Start key 6 
Start key 


(As re 


quired 


for subject program) 




PROGRAM . 

(Without 
pre-edit) 


. Card-loaded program 
Tape-loaded program 


OFF 
OFF 


OFF 
OFF 


ON 
OFF 






OFF 
OFF 



'Alteration Switch 0916 must be OFF if re-entry to system is by reset and start, except as noted 
under memory and tape print instructions. 

"These will be on tapes 0202 and 0201 respectively, regardless of settings. 

"Reset-start. Start again after typed message. Memory print will occur first, then a tape print for 
each start until 0916 is turned OFF. Select tape units by binary representation, in 0911 thru 0914, 
of units digit of desired unit. 

•Reset-start. Start again after typed message. Turn 0916 OFF, reset and start to return to system 
control 1. 

5 Reset-start. Turn 0916 OFF after typed message. Select tape unit by Alteration Switch combina- 
tion. Selected tapes will print for each start until reset. 

"Brings executive routine and subject program into memory to operate. After typed message and 
HLT 1111, set switches as required and depress start key. 
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Appendix I— Operation execution times 

The execution times for certain operations are given here to indicate the 
general speed range for the print i system, in running time. It should be 
noted that these times cannot reflect elapsed problem time, and that in general 
they bear the burden of flexibility and convenience. As the system is still 
in process, final times for other mantissa lengths than those shown here may 
be expected to vary. The final manual will contain a complete list of guaran- 
teed execution times for all operations not associated with input-output 
equipment. 

The times given here are for complete multi-address operation and include 
all interpretation and miscellaneous times. All times are given, in milli- 
seconds, for a 10 digit mantissa system, except as noted for 8 digit. 



Non-zero operands 



Zero operands 



Single 
execution 



ADD, SUB 4.9 

MPY, MMY 7.1 

DIV, MDV 18.6 

PMA, MPM 8.6 

MAD, MMA 8.8 



10 time 
average 

4.2 
6.3 
17.5 
7.4 
7.6 



Single 
execution 

3.1 
4.0 
3.1 



10 time 
average 

2.4 

3.2 

2.0 



SQR 16.4 (8 digit) 

ART 26.9 (8 digit) 

EXE 20.1 (8 digit) 

EXD 18.0 (8 digit) 

SAC 25.7 (8 digit) 

LGD 13.9 

LGE 16.8 



ENT 


?,? 


LVE 


.8 


TRU 


.8 


TRZ, TNZ, TRP, TRM . 
TRC 


1.4 
?3 


ATR 


1 5 


RPT, RWR 


1.3 



TMT 1.9 

TAB.TNA 2.1 

XTP 1.1 

RPL 1.7 

SRi 1.3 

TXi, TNi 1.0 
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Translation chart for non-indexable 
(non-repeatable) operations 





m 

8 

o 


3 


8 

o 


~o 

8 

o 


8 

o 


CO 

8 

o 


8 

o 


o 


ft 
o 


ft 
O 


ft 
o 


ft" 
o 


ft 
o 


ft 

o 


r^ 

ft 
o 


CO 

ft 

o 


o 


o 


COMMENTS 







+ 
4 


This ope re 


Hon sac 


rificed for system control. 







+ 
9 






1 


+ 
4 


> TRM 


1 


+ 
9 


a 
x t * 


X 


X 


P-2 ± 

XXX 


M 

N 


Tens position of B-2 is signed + for TRP and TRZ , 
signed - for TRM and TNZ 


I TNZ 


TRU 


2 


+ 
4 




RPT 


2 


+ 
9 


n-1 

± 

X X 


X 


i 

X X 


X 


i 

X X X X 


k 

X X X X 


* 


n-1 is either x * or qJ for indefinite RPT. 
i , j and k fol low the rules for SRi except = 
actual number only when asterisked. 


RWR 


3 


+ 
4 


TNI 


3 


+ 
9 


a 

+ + 

XXX 


X 


1 

2 
1 
2 
1 
2 


Increment 

X X X X 


a = basic address (BADD) of the command to which transfer is 
made. Increment follows the rules for SRi . 


TX1 


TN2 


4 


+ 
4 


TX2 


TN3 


4 


+ 
9 


TX3 


RPL 


5 


+ 
4 


a - 9/1 1/ 

XXX 


13 

+ 

X 


X 


8+2 

XXX 


8 = command basic address. If RPL is indirect for LAR 1 or LAR 2, the 
a position is replaced by 2044 or 2019, respectively. 


XTP 


5 


+ 
9 


a-1 

+ 

XXX 


X 


X 


8-1 

XXX 


a and p are basic addresses of data words. 


ATR 


6 


+ 
4 


a 
+ + 

XXX 

.ft 

(if not spec 


X 


ifie< 


i 

X 


X 


+ p + 

X X X X 


i 

X X 


tally 



i and j are zoned in the 10s position for count 
up to 399, in ADM collating sequence. 


WLi 


6 


+ 
9 


LC- 


H 

+ 

X 


tally 



unit ± 
x o x 


2 6 N 


u 


s 


s is the spacing control character, u is 
4 for tape, 5 for printer. UNIT is 20i or 
400, with units pos. zoned - for triple 
space, + for none, single or double. Line 
count (LC + 1) is qq if not specified. 


WH! 


3 8 G 


W 1 


7 


+ 
4 


i 3 





3H 


n n Tl 




W\ 


± 


A 


TMi . 


2D punch 


7 


+ 
9 


n t t 





3 





R 9 






!D reader 


x x k 


X 


1 


Y 4 




SRI 


8 


+ 
4 


- limit 

XXX 


X 


* 


set to 

X X X X 


set = f (first position) , - limit = f(second position). Both are 
unsigned true (or 40,000 complements) products of ( number) 
times the (word length). 


SR2 


8 


+ 
9 


SR3 


9 


+ 
4 


LVE 


9 


+ 
9 


1 


X X 


a 

X X 


a is first following 705 command location if not specified. 
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Translation chart for indexable 
(repeatable) operations 





CO 

oo 
o 


o 


o 


o 


o 


00 

o 


o. 

8 i 

o < 


% ft 

3 O 


CM 
O 


CO 







10 







1-N 

ft 




00 
ft 

O 


On 

ft 
O 





COMMENTS 


ADD 





4 


a 

X 


-9/11/13 

XXX 


a i Pi r, 

XXX 


P- 9/ll/l3 
X X X X 


r -9/11/13 

X X X X 


H 

Q 

H 

Q 

H 

Q 

H 

Q 

H 

Q 




SUB 


MPY 





9 


MMY 


1 


r 


' 








' 




DIV 


1 


4 


MDV 


MAD 


1 9 


MMA 


PMA 


2 


4 


MPM 




SAC 


2 


9 


X X X X 




SQR 


3 


4 


x x 










1 



1 









LGD 


3 


9 


1 






LGE 


EXD 


4 


4 


EXE 


ART 


4 


9 


(FSR) 


5 


4 


TMT 


5 


9 




s 


5 is a + sign for TAB, a - sign for TNA 


\& TNA 








i WCDt 


6 


4 


X 


+ r + 

XXX 


♦ q 


Pi 


a - 9/11/13 

X X X X 


X X X t> X 


1 


* = 5 for (TMKWCD + WTi), =0 for 
RTi + RCD + (Tm7(WCD + WTi) 


i RCDt 


5 J 


T 
1 




6 


9 








p+1— ^ 

-A( word length) + 19/2l/23 


y is the BADD of the next command 

if not specified. 

a address is xxxx for WTi and RTi, 

3509 for RCD and WCD. 

B+ 1 is xxxx for WTi, 3NY9 for WCD. 

a. =0 for RCD + WCD, x for RTi + WTi . 

Pj=0 for RCD + WCD + RTi, x for WTi. 

-M-L or M + R 




7 


4 


/ 






7 


9 


X 




TSC 


8 


4 


+ 


- A 


x 




X 


6-9/H/13 

X X X X 


y -9/ll/l3 


A 

1 


TRC 


X 


a 
+ + 

XXX 


TRE 


8 


9 


XXX 


X 








FLO 


9 


4 


X 


a 

XXX 


0x0 


B - 9/11/13 

X X X X 


X X 


X X 


written! FLO, a units, N, RorL n, 6, p index 
|L or R| < 80 N * 2 mantissa lengths 


FXP 


9 


9 


a ■ 

X 


9/11/13 


*i 


- 


F 


TW+265 


D + l 


D+W-M 


*"' command is written; 

FXP a, a index, TW, wW, dD, F 


FPR 


X 


X 


X 


X 


± 

X 


X 


X 


+ 

X 


X 


+ 

X 


X 


4 
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PRINT 



DIGIT 



MANTISSA 



iO 

»0 
.0 
10 
iO 
10 
iO 
10 
iO 
10 
iO 
10 
>0 
10 

■ 
10 

■ 
10 
iO 
»0 
iO 
>0 
iO 
10 
iO 



14 19 
12 4 7 9 


1 

10 4 9 4 


1 

12 8 5 4 


10 4 4 
13 6 4 


10 4 3 4 
13 9 7 4 


10 3 6 9 
12 9 4 4 


10 3 5 9 
10 7 8 4 


10 9 9 
10 8 19 


10 9 3 9 
10 8 4 9 


10 9 7 4 
10 2 8 9 


113 14 

10 5 2 9 


113 2 4 

10 5 2 9 


113 7 9 
12 5 7 4 


113 4 9 
1 


113 3 9 
1 


10 5 3 4 
1 


10 5 2 9 
119 7 4 


10 5 2 9 
119 6 4 


10 5 2 9 
1112 4 


10 5 2 9 
12 2 4 4 


7 


9 


1 


ojo 1 1 


14 


17 


18 


. A 


(12):(10)j PAC2 


PAC1 


PAC1 


(10)j(12)j* 


C 


w.t. + 

1 


2 olo^Wo Oto t $0 JjZ 


H 


A 


STANDARD COMMAND POSITION 


8 

c 
f 


o Pa 


C 





l 


J 


o o k o a 


t 


6 3 T 4 


U 2 8 3 


9 (BADD) 


O K H 4 


M B 4 


7 L E D 


1 J 


RVYR 

U 2 4 9 


9 2 6 9 


Rpr 

U 3 9 


9 2 8 9 


8 T / 


8 T J 4 


8 T A 8 


8 2 S 2 


10 3 2 4 


T 2 9 1 
H 


8 B R 3 
4 3 4 


M 4 4 9 
8 2/4 


7 D K 5 
1 3 2 D 


H 


4 6 4 


TRU 

U 3 3 1 


9 2 Y 5 


10 3 2 9 


7 D N 5 


-m-i 
R 


D 


099999999 I 9191 


oper 


U 5 1 6 


9 2 Y 5 


U 5 1 1 


9 2 Y 9 


U 


--■J 
9 


12 5 6 4 


GCWL s-ft 

8 2/8 

9 2 6 9 


U 5 6 1 
U 


9 2 Y 5 
9 1 R 2 


U 5 8 1 

L $ 6 


9 2 Z 2 

N L B 4 


7 N F 9 
6 3 6 


U 1 9 2 
6 V W 4 


9 

6 V 4 


13 
10 5 5 9 


U 1 9 2 4 


tNO£XIM0 

8 B 9 1 
8 X 8 


N G 9 
6 S 9 5 


8 K Y 9 
8 K Z 1 


N V 9 
N P t ' 


7 U 8 
7 Z 8 


8 X 8 
BOX 8 


6 S 8 8 
6 S 9 9 


8 K Z 
7 P A 4 


N Y 4 
1 1 


7 0X3 


K, * 


Rj limit +. 


R 2 * 


R 2 limit ^ 


Rl + R 2 % 


% 


«3 * 

* 


R 3 limit ^ 


R l + R 3 + 


i t 9f 


R 2 + R 3 t 


6 


R 1 +R 2 +R^ 


5W 

U 7 3 9 

8 7 V 8 

9 7 4 4 


9 7 2 9 
U 7 2 9 
9 2 8 9 


U 7 5 9 
10 8 7 4 
4 L S 4 


9 7 4 9 
U 7 5 9 
L 9 3 9 


8 7 W 8 

9 7 19 
K 9 7 4 


U 7 1 9 
8 0X28 


10 8 7 9 
8 7 T 8 


SR2 

U 7 3 9 
U 7 4 9 


9 7 19 
7 0X68 


8 0X48 
7 7X8 


TWI,TX( 

8 2 Z 3 
8 P T 
4 2 9 


6 7/8 
6 7 T 8 
L 4 3 4 


6 7 V 8 
110 4 
K 4 6 4 


6 7 S 3 

TM3 TO 

8 2 Z 3 

4 V 8 


8 P S 
6 7 U 8 
K 4 6 4 


10 9 6 4 
6 7 V 8 
10 4 3 4 


8 2 Z 3 
6 7 W 8 


6 7 S 8 
6 7 V 3 


6 7 W 8 
8 P V 


6 7 T 3 
6 7X8 


OCT 

110 4 4 
B % t 4 


7 3 T 4 
B ^ 4 


8 7X3 
B % % 4 


6 3 T 4 

BO^O « 


+ 
B A 8 

6000 2 


B $ 6 5 
H 2 2 


B 3 
10 3 2 9 


B 1 


B % 1 


B 1 


FLO 

U 1 1 5 6 


9 2 Y 5 


H K W 


8 K I 7 


7 1 J E 4 
N 1 2 9 
T 1 R V 4 
P K H 2 


P K H 1 
G K I 9 
6 K V 2 
1 1 1 7 D 


BOO 
112 14 
U 


8 

8 K $ 1 

9 K 4 5 


7 19 5 4 

F K E 4 

+ 
L 6 


G 1 2 2 9 
8 2 Z 5 

N L I 4 


X 1 2 
7 1 2 

6 3 


9 
V 




4 
4 
6 


7 1 
F 1 

6 1 


K C 4 

no" 

/ V 9 


M 
6 


1 




J 


s 


I 4 
R 5 


P K 
7 2 
1 1 1 


Y 2 
5 2 

3 4 
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PRINT 



D I 6 I T 



M A N T I S S A 



1300 
13S0 
1400 
1450 
1500 
1550 
1600 
1650 
1700 
1750 
1800 
1850 
1900 
1950 
2 000 
2050 
2100 
2150 
2200 
2250 
2300 
2350 
2400 
2450 
2500 
2550 



AAABBBDODH 


ARITHMETIC 

T 1 4 5 
6 14 5 
9 L ^ 

114 7 4 

115 2 4 
P 1 R C 9 
U 1 9 2 
S 1 R C 9 
4 S F 8 
D 1 
4 1 9 L 
C 3 
P 1 R B 9 


113 6 9 

6 14 4 

+ 
U 1 9 2 

9 1 R 3 

P K H 2 

+ 
4 L 3 

9 1 R 3 

X 1 I 4 

L 1 7 4 4 

P K H 2 

K 1 6 7 9 

G 2 7 2 

1 1 6 6 D 


T 1 5 4 

113 8 4 

9 

9 K 4 5 

G 1 R B 9 

K. 1 7 7 9 

8 9 

M 4 E 9 

U 

116 4 9 

F 1 9 2 7 

V 1 9 3 7 


6 14 6 
T 1 4 4 
9 

N 1 5 4 4 
115 4 4 

7 1 <b B 9 


U 2 4 9 
9 K 4 5 
M 1 P I 9 
C 3 
E 9 


113 6 4 
U 1 4 2 1 
19 2 7 
4 1 9 K 
H 1 9 2 7 
7 1 E 4 
G 1 9 2 7 
9 2 6 9 
N 3 K. B 4 
U 2 4 5 
F 1 9 5 4 
V 1 9 5 4 


T 1 4 6 

9 2 Z 2 

+ 
H 1 J H 

tC 1 5 3 4 

8 1 R B B 
M 1 A 4 
N 1 6 7 9 
117 4 
6 1 X B 4 

9 1 R 3 
H 4 8 3 
X 1 8 9 4 


113 5 9 
U 1 7 2 1 
A 1 8 9 
V 1 9 2 7 

116 6 9 
B 
G K C 
F 2 5 2 
6 1 U S 9 

117 4 
W 1 9 5 4 
E 4 


T (0 1 0) 
9 2 Z 6 

g i r a i 

C 7 
N 1 7 8 4 
F 1 9 2 7 
X 1 7 6 4 
F K E 4 
6 1 U K 4 
G 1 R C 9 
F i 9 5 4 
X 1 9 1 4 


6 14 6 
U 1 4 2 6 

115 4 1 
X 1 5 1 9 
4 1 9 L 
H 1 9 3 7 
C 

Q L 6 
6 3 6 

116 6 9 
Q 1 9 5 4 
E 1 


6 15 4 
9 2 Y 5 
U 1 9 2 o" 
C A 
K 1 6 6 9 
116 2 4 
C 1 
N 1 P B 4 
114 19 
N 4 3 9 
V 1 9 2 7 
S K H 2 


TEMPORARY STORAGE 




TEMP. STORAGE 


TRC TCtB .TSC 

8 N Z 5 

U 1 9 3 6 
H 1 9 3 

6 2 t M * 
8 1 T M 9 
6 3 6 


119 7 9 

9 

P 1 9 4 3 

8 T A 8 

7 2 $ 4 4 

13 2 2 4 


8 L U 
H 1 9 4 5 

2 13 9 
N 2 +" C 9 
12 3 9 

9 1 R 3 6 


7 2 0X0 
G 3 5 2 

8 2 $ 4 4 
6 2 ^ A 9 
6 S 8 8 
8 K G 8 


U 2 1 4 5 
7 19 3 5 
U 2 4 4 
12 14 

7 2 J 1 9 

+ 
7 L 6 


9 L 
U 1 9 2 3 

9 1 R 2 3 
U 2 4 3 
8 S 8 8 

10 4 3 4 


8 S 9 5 

9 

Q L 6 

9 1 R 2 3 
7 2 S 4 


7 2 $ 4 4 
H 1 9 3 2 
N 3 K B 4 
12 2 2 4 
B 2 


U 2 1 6 
6 3 5 2 
M 2 J A 4 
4 1 T M 9 
8 


9 2 Z 6 

7 19 2 2 

6 3 6 
L 2 1 7 9 

7 2 5 4 


PUP, F« 

U 2 2 8 6 
U 3 

G M G 2 
B 


9 2 Y 5 

9 K S 7 

7211! 



H B 9 6 
U 2 3 9 2 
M 2 L 6 9 
5 3 


7 2 B 9 4 
9 4X0 
T K Z 

Q L t 6 


5 B 9 8 

6 S R 6 
6 < Z 
N 3 K B 4 


4 3 12 
H K I 3 
6 2 3 R 5 
6 3 6 


K 4 7 9 
G 1 R B 9 
Q 2 Q 2 
<> 2 S Y 9 


7 2 4 
M 2 L C 9 
P L 

1 2 2 5 D 


U 1 9 2 
6 2 t I 4 
M 4 H 9 


9 

G K I 8 
H 1 9 2 7 


ARG1 


1 ARG2 




*— 1 * 


CfRSOR ROUTINE 

U 4 2 4 1 


9 2X51 


14 2 4 


Aft- 
er 2 8 8 

T 


M 2 4 9 9 
M 2 5 4 4 


7 2 4 9 4 
12 5 5 4 


8 

8 7*3 


7 2 8 8 
6 2 Y 8 


ARG2 U- 


8 2 Z 2 

U 


7 2 5 V 4 

9 2 Y 5 


7 Z 5 S 9 

8 2/1 


8 1 6 V 9 
10 3 2 4 


6 2 5 S 9 


RTi.WTV 

8 1 K Q 3 


T 2 8 9 


8 L t 


7 2 6 V 4 


7 2 P Y 9 


U 2 7 1 



52b 



PRINT 



DIGIT 



MANTISSA 



9 2 2 2 


T 2 





/ 5 


T 


2 


P U 5|M 


2 6 2 9 


6 2 P U 5 


T 2 6 5 4 


M 2 6 4 9 


6 2 Q / 5 


8 M L 8 


7 2 P 


2 


2 


3 








8 





S 9 9 


7 


2 W 8 4 


7 2 W 8 9 


7 2X19 


8 


U 


9 P W 4 


B 3 









L 


$6 


I 


2 


7 5 9 


7 




N 2 P 9 


6 2 X % 4 


6 S R 9 


6 3 6 


12 6 6 4 


3 1 


1 3 
3 


2 2 4 




6 2 
N 2 


8 



4 
A 9 


2 
1 



4 


9 2 
2 6 9 



3 


2 7 7 9 
1 


14 13 9 
10 4 3 4 


X 2 7 8 9 


14 14 9 


2 2 


3 4 


12 7 4 


8 K Z 6 


N N Y 4 


T 1 9 2 7 


6 1 R S 7 


10 5 8 4 


8 
8 


K I 
K A 


4 
6 


K 
K 


I 8 
I B 


L 
U 


2 
2 


8 7 4 

9 2 1 


1 
9 


2 9 4 
3 T 1 


B 4" % 6 
U 


8 B Z 6 

9 B H 3 


U 2 9 1 
10 4 3 4 


9 8 Y 5 


7 B Z 


9 K F 4 


5 blanks 


U296790S89 
209020300 


U 2 
1 4 


9 9 9 
1 1 9 


9 
2 


K 

3 


Z 3 



H 
3 


1 
8 


A *8 
5 5 


2 
X 




2 1X4 


3 5 9 
14 12 9 


12 9 8 9 


10 4 6 4 


4 3 4 


16 5 9 


13 5 9 4 


14 4 7 4 


EKE. eX'6 

14 8 7 4 


15 4 6 9 


FSR 
I 


TMT 

12 8 


2 9 


8 

L 


6 K I 
4 3 4 


6 

H 


2 R 2 
2 9 5 


U 3 8 1 
7 3 15 9 


9 3 T 1 
7 3 2 4 9 


U 

U 3 2 5 4 


4 K I 2 
9 K Z 9 


K 3 1 9 
H 1 A $ 8 


8 1 J $ 8 
H B 9 8 


7 


K I 2 


9 


B 


H 3 


7 3 


A 6 4 


2 






R 


3 




I 


3 2 3 4 


U 3 3 8 7 


9 L t ° 


U 3 2 6 5 


9 L % ° 


M 3 B 1 4 


B 2 6 


9 2 

3 


I L 5 



X 3 
X 3 


2 

A 


4 
W 4 


M 
1 


3 

4 


2 2 4 
10 9 


R 


2458J802S6 


10 3 2 4 


2 9 2 


3 2 4 9 


14 9 9 


2 




















LINE IMAGE 








* 














HEADING IMAGE 


♦ 


1 












H 1 5 8 3 

M 3 V 4 


V 1 9 2 9 
13 6 5 9 












CARD IMAGE iz 


F 1 


9 3 


C 





1 


F 


1 


9 2 9 





19 2 7 


N 5 7 4 


M 4 4 9 


H 1 R T 


N 3 6 X 4 


6 1 


9 K 9 


8 1 


J 


/ 1 


B 





9 


1 


3 6 7 9 


1 


F 1 9 3 9 


7 1 R T 


C 5 


F 1 9 5 3 


C 2 


8 


L H 


U 3 


7 


2 3 


9 


1 


C 7 


6 


3 P B 4 


4 3 9 


K 3 7 1 9 


U 3 7 4 8 


9 3 P B 3 


U 1 9 4 


9 3 R 


1 


9 4 3 


V 1 


9 


5 3 


C 





2 


G 


19 4 6 


F 3 8 9 8 


19 3 9 


C 1 


W 3 8 9 8 


T 3 R 8 


G 3 9 


F 1 
Wl 


9 4 5 
9 4 5 


H 1 
T 3 


5 
R 


8 3 


V 

P 


1 
3 


9 4 5 
9 10 


C 

E 


1 
1 


F 3 9 6 
X 3 8 8 4 


V 3 9 6 
10 5 8 4 


C 1 
7 19 2 7 


G 1 9 3 9 


B 6 
1 5 8 D 


5 


t 


6 


6 


1 


R 


S 7 






52c 



PRINT 



DIGIT 



MANTISSA 



3900 
3950 
4000 
4050 
4100 
4150 
42 00 
4250 
4300 
4350 
4400 
4450 
4500 
4550 
4600 
4650 
4700 
4750 
4800 
4850 
4900 
4950 
5 000 
5050 
5100 
5150 



T" 









1 4. A 


.0 6 





2 


3 


. B .0 7 


H 


7 


2 


.B 


.1 1 


T 



1 


7 


1 . D .1 7 





2 9 


1 


.0.2 4 


G 


5 9 




H 3 


D 


9 9 


F 


4 


I 


+ 



*R 


f*W, RJ,IM 

U 3 9 9 4 


9 


K Y 


5 


9 





B Q 


6 


H 


B 


Z 3 


2 


2 


3 


P B 


Y 


2 


N 


W 4 


1 3 


9 9 


9 


2 2 





3 





2 


Y 








1 








4 


8 2 A 
8 3 H 


1 2 

1 2 


4 6 4 
4 6 4 


8 
8 






A 9 
2 7 


14 1 


6 


4 


8 


1 E 2 


1 2 


4 6 


4 


8 


9 


F 


1 


2 4 


6 4 


8 


2 


3 


1 


2 


4 6 


4 


12 4 


6 


4 


8 


1 E 1 


1 2 


4 6 


4 


8 


1 2 


1 


1 


4 1 


7 9 


8 


12 


2 


1 


4 


1 7 


9 


8 


1 


2 


1 2 


4 6 4 


8 


1 


2 4 


12 4 
7 2 4 


6 

E 


4 

7 


8 1 
U 2 


8 2 
4 5 


U 4 
9 


2 4 
T 3 


1 
1 


9 

T 


2 V 
2 4 


6 6 
5 1 


1 
T 


4 2 
2 4 


4 
5 2 


U 
2 


4 2 4 
5 


1 




9 
R 


2 

2 


Z 8 
4 5 


1 



1 

J 


4 2 



4 
1 


U 4 
1 


2 4 1 


9 


6 


W 3 6 


8 4 2 
2 2 1 


14 1 


6 


4 


8 


6 2 


1 4 


1 9 


4 


8 


1 1 


B 3 


1 


2 4 


6 4 


2 


10 





i 


4 


3 1 


4 


J 


1 





A 4 


3 3 4 


3 
N 4 4 





4 

9 


1 4 
7 4 


3 3 9 
3X4 


J 
U 4 


1 

3 7 


1 
6 


5 

9 


6 9 
4 3 


8 9 

R 9 


B 

B 





*2 




B 
U 





4 


2 
9 



4 


1 
U 



5 


Y 

1 


4 3 
4 3 


9 
3 9 


I 4 


2 7 9 


8 


4 


4 $ 4 






B 
8 


Tsrrf 


3 I 


6 9 


B 
6 


0/ 
4 E 3 




4 


Q 
G 


1 


9 2 


7 


M 
H 


4 2 


4 9 


F 1 
V 1 


9 2 7 
9 2 7 


C 

E 






7 
1 


V 4 8 


4 


5 


P 4 


8 5 8 


7 4 


5 3 


4 


7 


4 5 


3 9 


X 4 4 


9 


4 


B 


8 


F 1 


9 2 


7 


F 


1 I 


T 9 


Q 


2 8 


5 8 


V 


19 2 


7 


E 








5 


G 


4 7 


4 


V 1 


9 2 7 


E 





6 


G 4 7 


4 


7 


V 1 


9 2 7 


E 





7 


G 


4 7 


5 5 


V 


1 9 


2 7 


E 





7 


P 


1 


9 3 


9 


F 


1 9 


3 9 


H 1 


9 2 9 


D 





9 


G 1 9 
E 


3 



9 
3 


E 

F 1 


1 
9 2 7 


8 
F 1 


K Z 
R B 


6 
9 


N 
1 


4 4 
5 


Y 4 
8 4 


V 

D 


4 8 



6 8 
1 


E 
P 



L H 


9 
8 


B 

1 




4 


1 
6 9 


1 
9 


N 


5 


7 4 


8 


C 2 


X 


4 


7 2 4 




1 4 


3 2 P 


2 


17 9 


8 


J 


4 3 


4 2 9 


3 


9 M 


5 


E 


7 4 3 


6 2 


6 9 


+ 



3 


F 


5 5 


6 3 


2 5 


A 


2 


G 


4 


3 


1 3 


6 3 


7 6 


D 


2 B 


3 


4 2 4 2 


2 


6 8 A 


1 H 


2 


5 


5 2 7 


2 5 E 


1 


E 


1 


7 6 


9 


12 5 


I 


1 


C 


1 1 


3 9 4 


3 3 


5 


8 


1 


B 





7 9 


18 12 


4 F 


1 A 





4 13 


9 2 6 


8 


E 


4 7 


4 F 


2 3 


2 5 


8 5 


9 


cl 


H 
G 


1 9 
4 H 


2 7 

U 5 


D 
M 



4 I T 


2 
9 


8 
1 



5 


K Z 

2 e 


6 

9 


N 
P 


4 R 
B 


W 2 


V 5 

7 4 


4 3 2 

I U 9 


X 

c 


5 



2 6 9 




E 





8 


H 1 


I S 9 


P 5 


C Z 


9 


M 


4 A 


V 9 


BOO 


1 





F 1 


9 2 9 


B 





8 


T 


1 R 


S 9 


6 


1 R 


S 1 


6 


IRS 


9 


H 


1 


I s 


1 


4 


3 J 


Z 5 


K 4 


1 5 9 


M 


5 


2 9 


G 5 4 





8 


B 


8 


F 1 


9 2 


9 


H 


5 D 


V 9 


6 


1 I 


S 1 


8 


IRS 


2 


7 


5 


u 


4 


7 


5 J 


Z 4 


Q 5 


3 9 


V 


5 


4 16 


G 1 9 


2 


9 


B 


8 


V 5 


4 2 


4 


C 





7 


B 





8 


F 


19 2 


9 


C 








7 


V 


4 8 


4 5 


G 5 


4 6 3 


7 


5 


19 9 


G 3 


3 


8 


7 5 


1 1 4 


Q 






G 


1 9 


2 9 


F 


1 9 


2 9 


V 


5 3 8 





c 








7 


G 


5 4 


3 8 


V 1 


9 2 9 


C 





6 


Ig 5 3 


8 


8|V 1 


9 2 9 


C 





8 


G 


5 4 


4 7 


V 


1 9 


2 9 


c 





8 


G 


5 


4 


8 


F 


1 9 


3 


H 1 


3 


V 







52d 



9200 
3250 
5300 
5J50 
5*00 
5*50 
5500 
5550 
MOO 
5*50 
5700 
5750 
5800 
5150 
5900 
5H0 
6000 
4050 
MOO 
6150 
MOO 
M50 
MOO 
M50 
MOO 
M50 



















P R I 


b 


T 




I 








8 C 


I G 


I 


T 




y 


A 


N T 


I S J 


A 
















V 1 9 3 


C 2 


B 1 


H 5 C Z 6 


X 5 2 5 4 


G 1 I S 1 


F 1 I S 9 


E 2 


F 1 9 2 7 


10 5 8 4 


P 5 C Z 3 


D 1 


15 2 2 4 


E 7 


Q 5 C Z 3 


6 1 I S 9 


14 9 9 


U 1 9 2 


9 5 M 4 8 


1 5 8 D 


1 E 


0487901F 


1 1 F 


1484200A 


1 2 H 


2468600H 


1 4b|3 5 6 5 6 8 G 

1 


1 5 gU 5 1 


7 5 6 B 


1 7 C 


5481214A 


1 9 B 


6 5 2 3 2 5 11 


4 1 6 G 


50000000 




IHa A ABBBC 


100000000 


3 10 3 








2302585A 


4342944H 


1 6 6 6 8 H 


099999991 


1 


OOOOOOOA 


J 


5 3 B 




H 1 9 2 7 
M 5 5 E 9 


N 5 8 4 
B 9 


M 5 4 8 9 
7 5 5 C 4 


Q 1 9 2 7 

COO 


F 6 9 8 

B 8 


H 1 9 B 9 
H E Z 3 


4 3 3 

F 1 I U 4 


K 5 8 9 4 


4 2 A 


K 5 8 6 4 


15 7 2 4 


7 5 5 F 4 


D 


C 6 


8 3 


U 5 5 9 6 


9 6 Z 4 6 


8 S 2 2 


6 5 V 9 9 


4 


K 5 5 9 4 


8 5 V 9 9 


G 3 Z 3 9 


7 5 W 2 9 


B 1 4 


8 5 


7 19 4 4 


H 1 9 3 4 


V 6 9 8 


C 2 


F 1 9 5 3 


7 5 6 F 9 


H 5 4 8 


COO 


G 1 9 5 3 


F 1 9 5 3 


Q 1 9 3 4 


D 6 


7 5 6 19 


COO 


G 6 9 8 


B 9 


D 8 


W 1 9 5 3 


F 1 9 5 3 


V 1 9 5 3 


C 8 


F 6 9 8 


H 6 2 


V 6 9 8 


C 5 


G 6 2 7 


V 6 9 8 


C 6 


G 6 3 7 


V 1 9 5 3 


C 8 


G 1 9 4 4 


N 5 8 4 


H 5 D V 7 


X 5 8 4 9 


C 2 


F 6 9 8 


F 1 I S 9 


T 1 I S 7 


M 5 H T 9 


Q 6 9 8 


F 1 9 2 7 


10 5 8 4 


P B Y 2 


1 
H 5 D V 7 


15 8 4 
H 6 4 5 


M 5 8 7 4 
15 8 14 


15 5 2 4 


B / 4 


U 1 9 3 1 


9 6 Z 4 


15 6 3 9 


M 5 9 4 


10 5 8 4 


2 7 1 C 


012927500D 


5 8 4 A 


038909723A 


1 


7 G 


065617871H 


17 3 1 3 J 


091510070A 


3 7 3 2 4 A 


117747926C 


9 9 9 7 6 J 


143996893A 


1 9 5 G 


3 3 3 2 9 6 M 


099999992B 


1570796C 


5 9 


7 2 9 




8 6 P Z 7 
M 6 1 1 9 


7 6 T 
Q 1 9 2 7 


H 1 9 2 9 
D 3 


4 6 8 5 
COO 


K 6 7 1 9 
B 1 1 


P 1 3 6 
V 6 8 7 7 


M 4 2 5 9 
E 8 


G 1 3 
B 9 


7 6 12 4 
F 1 9 3 8 


H 1 9 2 7 


H 6 8 8 6 


P 1 9 3 8 


M 6 2 2 4 


G 6 8 9 5 


M 6 1 9 9 


H 1 9 3 8 


P 6 8 3 5 


B 9 


16 2 4 4 


H 6 8 8 6 


P 1 9 3 8 


8 6 P U 4 


7 6 <t T 


16 2 4 4 


P 6 8 9 5 


M 6 2 3 9 


16 19 9 


H 1 9 3 8 


V 1 3 6 


B 1 


F 1 9 3 9 


U 6 B 8 2 


9 6 5 


H 6 H 9 8 


C 8 


6 6 B 8 4 


4 6 


K 6 2 7 9 


L 6 2 7 9 


U 6 C 1 2 


969 82 


B 1 9 


8 6 


7 19 5 9 


H 1 9 3 9 


M 6 3 4 9 


Q 1 I S 7 


F 1 I S 7 


Q 1 9 3 9 


P 1 9 5 1 


E 1 


B 8 


F 1 9 3 9 


V 1 9 3 9 


E 8 


F 1 9 5 1 


H 1 3 9 


V 1 9 5 1 


E 5 


G 6 8 5 9 


V 1 9 5 1 


E 5 


G 6 8 6 8 


V 1 9 3 9 


E 8 


F 1 9 3 9 


H 6 8 4 7 


V 1 9 5 1 


E 6 


G 6 8 5 4 


V 1 9 5 1 


E 6 


G 5 4 8 


F 1 9 5 1 


H 1 9 5 4 


V 1 9 5 1 


E0 002;F6 908 


H 1 9 5 7 


V 1 9 3 9 



52e 



PRINT 



DIGIT 



MANTISSA 



6500 
6550 
6600 
6650 

6700 
6750 
6800 
6850 
6900 



E 
6 9 
N 6 7 
16 6 3 


2 
8 

4 
9 


G 

F 
H 
D 


6 
1 
2 




9 8 
9 2 7 
B V 2 
1 


N 6 6 
H 1 9 
X 6 6 
P 5 C 


8 9 
5 4 
7 4 

Z 3 


H 
V 

c 

1 


2 B 
1 9 

6 5 


V 
3 

2 


2 
9 
2 

4 


X 6 6 

E 
F 1 9 



5 9 
2 
3 7 

1 


F 
F 
F 
P 


1 I 
6 9 

1 I 
5 C 


s 



T 

z 


9 
8 
9 
3 


C 2 
H 1 9 5 7 
16 6 4 4. 
16 6 14 


H 1 I S 7 
V 1 9 5 1 
16 9 14 
19 2 


M 6 E V 9 
E 2 
19 3 7 
9 K 6 5 


F 6 9 8 
P 6 9 8 
F 1 9 3 7 
16 5 6 4 


U 1 9 3 


9 K 6 5 


16 6 3 9 


M 4 2 5 9 


B 


16 12 9 




0000000000 


J 


1 o o" 


1 




018066894A 


2 H 


9 F 


3 




0409665530 


6 5 


8 


5 




059033447A 


8 


* 


T 

6 


7 




0819331051 9F 


2 H 


9 




+ 
100000000 


10 





9 I 


2 5 3 B 


1 2 


3 3 6 9 


6 4 5 9 P 


15707963G 


15915494C 


50000000$ 


250000000 


1 I 




WORK AREA 


SAC 

8 2 S 2 


U 6 9 2 6 


9 2 Z 6 


U 


9 1 R 3 


6 6 Z B 9 


10 5 8 4 





52f 



ENTER ROUTINE 



Y-10 


SET 


0004 


01 


Y-05 


LOO 


Y-05 


01 


Y 


TR 


1039 




1039 


TRA 


1044 




1044 


UNL 


0334 


01 


1049 


LOO 


0773 


01 


1054 


AOM 


0334 


01 


1059 


SET 


0018 


15 


1064 


SET 


0005 


14 


1069 


SET 


0003 


12 


1074 


SET 


0001 


10 


1079 


SET 


0001 


09 


1084 


SET 


001" 


08 


1089 


SET 


0004 


07 


1094 


SET 


0004 


06 


1099 


SET 


0004 


05 


1104 


SET 


0004 


04 


1109 


SET 


0002 


03 


1114 


RAO 


0282 


02 


1119 


TR 


0329 





0006 



0/2/4 



THESE 3 COMMANDS 
COMPILED BY THE 
PRE-EDIT ROUTINE 



BA00-6 ZONED FOR ASU 01 
BADD ZONED FOR ASU 15 



DIFFERENT FOR 20 DIGITS 



TO FIRST COMMAND 



6 
6 
2 

2 
6 
6 
6 
20 
7 
5 
3 
3 
12*14,16 
6 
6 
6 
6 
4 
3 
2 



FETCH AND SUB-ROUTINE SWITCH 



324 ADM 


0334 


01 


329 RCV 


0283 




334 TMT 


BADO 


15 


339 RSU 


0284 


11 


344 TRP 


0624 


11 


349 UNL 


0354 


11 


354 TR 


OOYY 


INDEXING 


624 LOD 


0291 


12 


629 TRZ 


0709 


12 



634 LOD 0289 09 
639 TRZ 0659 09 
644 UNL 0648 09 
649 LOD 0708 04 
654 ADM 0288 04 

659 LOD 0290 09 
664 TRZ 0684 09 
669 UNL 0673 09 
674 LOD 0708 04 
679 ADM 0295 04 

684 LOD 0291 09 
689 TRZ 0709 09 
694 UNL 0698 09 
699 LOD 07Q8 04 
704 ADM 0299 04 

709 UNL 0714 11 
714 TR 01YY 



NEW BADD EQUAL OLD PLUS LENGTH 

MOVE VARIABLE LENGTH 

COMMAND TO STO. POSITION 
YY 40 CODES 04 BY 5 TO 99 

ADDR. IS OPTIONALLY 0634 
YY ACTUAL PLUS 0P» NON-INDEXABLE 

YY VARIES 04 TO 99 



XXX TEST FOR ANY INDEXING 



ALPHA INDICATOR 



TO 7 



CONTENTS OF INDEX REGISTER 
INDEX FUNCTION OF ALPHA 

BETA INDICATOR 



CONTENTS OF INDEX REGISTER 
INDEX FUNCTION OF BETA 



GAMMA INDICATOR 



CONTENTS OF INDEX REGISTER 
INDEX FUNCTION OF GAMMA 



YY VARIES 04 TO 99 



6 

2 
20 
4 
2 
4 
2 



5 

2 

3 
2 
3 
6 
6 

3 
2 
3 
6 
6 

3 
2 
3 

6 
6 

4 
2 



52g 



CONDITIONAL TRANSFER COMMANDS TRZ»TNZtTRPtTRM 



<t04 SGN 0291 00 
409 LOD 0293 14 
414 TRP 0449 00 



STRIP INDICATOR SIGN 
XXXXX BETA ADDRESS AND OP CODE 
TRANSFER TO TRP/TRZ TEST 



4 
7 
2 



419 UNL 0425 

424 RAD 

429 fM/Nj 0464 




BETA-2 



INSERT OP CODE AND BETA-2 7 
MANTISSA OF BETA 10»12tl4 

TO NEXT COMMAND IF PLUS OR 2 



UNCONDITIONAL TRANSFER COMMAND 



TRU 



434 RCV 0331 
439 TMT 0285 
444 TR 0329 



01 



FIRST STEP OF TRU. REPLACE 2 

BADD BY ALPHA 6 

NEXT COMMAND • BYPASS LENGTH -4 



449 UNL 0455 14 
454 RAD -"-"So - 
459 lM/N| 0434 00 

464 LOD 0214 01 
469 TR 0324 



BETA-2 



0011 



INSERT OP CODE AND BETA-2 7 
MANTISSA OF BETA 10»12il4 

TO ALPHA IF PLUS OR 2 

LENGTH FOR TRZ.TNZ»TRP.TRM 6 
TO NEXT COMMAND IN SEQUENCE 2 



EXTRACT POWER COMMAND 



XTP 



494 RCV 0516 

449 TMT 0285 01 

504 RCV 0511 

509 TMT 0289 01 

514 RCV 

519 TMT 

524 TR 2564 



■BETA-1 
"ALPHA-1 



SET UP TMT FOR 

POWER OF ALPHA 
SET UP RCV FOR 

POWER OF ALPHA 
DUPLICATE POWER OF 

ALPHA IN BETA 
TO NEXT COMMAND VIA RPL 



GENERAL SUB-ROUTINE HOUSEKEEPING 



529 


LOD 


0218 


01 




534 


RCV 


0561 






539 


TMT 


0285 


01 




544 


RCV 


0581 






549 


TMT 


0292 


01 




554 


UNL 


0569 


11 


29 


559 


RCV 


1920 






564 


TMT 




"oli 


— ALPHA-9/11/1 


569 


TR 


30YY 






574 


RCV 


1924 






579 


TMT 


0269 


00 




584 


RCV 






-»» BETA-9/11/13 


589 


TMT 


1920 


08 




594 


RSU 


0306 


11 




599 


TRZ 


0324 


11 




604 


ADM 


0306 


02 




609 


ADM 


0564 


05 




614 


ADM 


0584 


06 




619 


TR 


0559 







0014 



XX 



LENGTH FOR SUB-ROUT. COMMANDS 6 

SET UP TMT TO FETCH 2 

CONTENTS OF ALPHA 6 

SET UP RCV TO STORE 2 

RESULT IN BETA 6 

SET SECONDARY OP SWITCH 4 



MOVE CONTENTS OF ALPHA TO 
FIXED WORKING POSITION 
TO SPECIFIC ROUTINE 

INSERT ZERO 

FOR RESULT 
STORE RESULT 

IN BETA 

REPEAT TALLY 

TO NEXT COMMAND IN SEQUENCE 

DIMINISH RPT TALLY BY 1 
AUGMENT ALPHA ADDRESS BY I 
AUGMENT BETA ADDRESS BY J 
TO REPEAT THIS COMMAND 



12»14il6 
4 

2 

3 
2 

12il4,16 

4 
2 

4 
6 
6 
2 
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SET INDEX REGISTER COMMANDS 



SRI 



784 RCV 0739 
789 TMT 0729 00 
794 RCV 0759 
799 TMT 0749 00 
804 LOD 0768 01 
809 RCV 0719 
814 TR 0879 

819 RCV 0739 
824 TMT 0719 00 
829 LOD 0748 04 
834 LOD 0758 01 



SRI 



SR2 



839 


RCV 


0729 




844 


TR 


0874 




849 


RCV 


0759 




854 


TMT 


0719 


00 


859 


LOD 


0728 


04 


864 


LOD 


0738 


01 


869 


RCV 


0749 




874 


UNL 


0768 


04 


879 


UNL 


0778 


01 


884 


TMT 


0744 


00 


889 


TMT 


0289 


00 


894 


CMP 


0374 


11 


899 


TRE 


0939 




904 


TRH 


0974 





SR3 



CONTENTS OF R2 TO 
Rl PLUS R2 

CONTENTS OF R3 TO 
Rl PLUS R3 

R2 PLUS R3 

MAC II TO Rl 



CONTENTS OF Rl TO 

Rl PLUS R2 
CONTENTS OF R3 
CONTENTS OF Rl PLUS R3 
MAC II TO R2 



CONTENTS OF Rl TO 

Rl PLUS R3 
CONTENTS OF R2 
CONTENTS OF Rl PLUS R2 
MAC II TO R3 

TO R2 PLUS R3 
TO Rl PLUS R2 PLUS R3 
SET REGISTER TO 
PLACE LIMIT IN REGISTER 
COMPARE OP CODE TO 89 
TO TN2 ON OP CODE 89 
TO TN3 ON OP CODE 94 



TRANSFER ON INDEX COMMANDS 



TXI. TNI 



909 LOD 0293 01 
914 ADM 0718 01 
919 ADM 0758 01 
924 ADM 0723 01 
929 LOD 0720 09 
934 TR 0964 



TNI 
TXI 



939 


LOD 


0293 


01 




944 


ADM 


0728 


01 


TN2 


949 


ADM 


0768 


01 


TX2 


954 


ADM 


0733 


01 




959 


LOD 


0730 


09 




964 


ADM 


0738 


01 




969 


TR 


1004 






974 


LOD 


0293 


01 




979 


ADM 


0748 


01 


TN3 


984 


ADM 


0758 


01 


TX3 


969 


ADM 


0768 


01 




994 


ADM 


0753 


01 




999 


LOD 


0750 


09 




1004 


ADM 


0778 


01 




1009 


CMP 


0289 


02 




1014 


TRE 


0434 






1019 


TRH 


0464 






1024 


CMP 


0658 


09 




1029 


TRH 


0464 






1034 


TR 


0434 







2 
3 
2 
3 
6 
2 
2 

2 
3 
6 

6 
2 
2 

2 

3 
6 
6 
2 

6 
6 

3 
3 
4 
2 
2 



XXXX Rl INCREMENT 6 

AUGMENT Rl 6 

AUGMENT Rl PLUS R3 6 

AUGMENT Rl LIMIT TALLY 6 

X 1000 POS. OF LIMIT TALLY 3 

2 

XXXX R2 INCREMENT 6 

AUGMENT R2 6 

AUGMENT R2 PLUS R3 6 

AUGMENT R2 LIMIT TALLY 6 

X 1000 POS. OF LIMIT TALLY 3 

AUGMENT Rl PLUS R2 6 

2 

XXXX R3 INCREMENT 6 

AUGMENT R3 6 

AUGMENT Rl PLUS R3 6 

AUGMENT R2 PLUS R3 6 

AUGMENT R3 LIMIT TALLY 6 

X 1000 POS. OF LIMIT TALLY 3 

AUGMENT Rl PLUS R2 PLUS R3 6 

1 FOR TNI. 2 FOR TXI 3 

TNI EQUIVALENT TO TRU 2 

TO NEXT COMMAND ON SRI 2 

1000 POS. WITH Z IN MEMORY 3 
HI* 0-9 IN 1000S. TO NEXT COMM 2 

TRU TO ALPHA 2 
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float command 



FLO 



1124 


RCV 


1156 






1129 


TMT 


0285 


01 




1134 


RAD 


0260 


09 




1139 


LOD 


0297 


11 




1144 


UNL 


1154 


11 




1149 


SUB 


0281 


11 




1154 


SET 


OONN 


00 




1159 


LOD 




"So ' 


"-"» ALPHA 


1164 


UNL 


1954 


00 




1169 


ADD 


1229 


00 




1174 


NTR 


1294 


00 




1179 


UNL 


1234 


11 




1184 


TRP 


1194 


11 




1189 


SUB 


0282 


09 




1194 


TRZ 


1209 


00 




1199 


ADD 


0299 


11 




1204 


TR 


1214 






1209 


LOD 


0201 


11 




1214 


ST 


0254 


11 




1219 


LOD 


0295 


01 




1224 


UNL 


1254 


01 




1229 


ST 


1230 


09 


3 i 


1234 


[c/S 


00 -- 


TiO 


N-M-S 


1239 


UNL 


0252 


00 




1244 


SGN 


1954 


09 




1249 


ADM 


0252 


_09 _ 




1254 


RCV 






-x BETA-9/11/13 


1259 


TMT 


0245 


08 




1264 


RSU 


0306 


11 




1269 


TRZ 


0394 


11 




1274 


ADM 


0306 


02 




1279 


ADM 


1159 


05 




1284 


ADM 


0295 


06 




1289 


TR 


1134 






1294 


SUB 


0282 


11 




1299 


TR 


1174 







3 



00 

xxxx 



INSERT ALPHA 2 

ADDRESS 6 

NUMERICAL PART OF SHR OP CODE 3 
N 4 

INSERT N IN SET INSTRUCTION 4 
N-M 4 

SET 00 FOR LOADING A 
LOAD A 
UNLOAD 
UNSIGN 



A TO TEMPORARY 
A BY ADDING -0 



XX 



N-M-S IN SHIFT ADDRESS 

TR IF N > ( M PLUS S) 

CONVERT 10 NUMER. PART OF LNG 

TRANSFER IF A EQUAL 

N-M-S PLUS P-N PLUS M 

EQUALS P-S EQUALS POWER OF A 

SET AP TO ZERO 

STORE AP IN PAC1 

ASU SIGN IS PLUS 

INSERT BETA-9/11/13 AS ADDRESS 

C OR D STORED IN SHIFT INSTR. 

SHIFT A TO MANTISSA LENGTH 

UNLOAD UNSIGNED A INTO PAC1 10«12»14 

STRIP SIGN FROM MANTISSA OF A 4 

PLACE SIGN OVER MANTISSA OF A 3 

SEND PAC1 TO 2 

RESULT POSITION 12»14»16 

REPEAT TALLY 4 

TO LOAD LENGTH AND TO NEXT 2 
REDUCE REPEAT TALLY BY 1 4 
AUGMENT ALPHA ADDRESS 6 

AUGMENT BETA ADDRESS 6 

TO REPEAT FLO COMMAND 2 

N-M - (S-l) - 1 4 

RETURN TO NORMALIZE 2 



REPLACE COMMAND 



RPL 



2479 


RAD 


0288 


00 


XX OR 2044 


2484 


TRP 


2499 


00 




2489 


UNL 


2494 


00 




2494 


LOD 


20 ^ 




"-x- 19/44 


2499 


UNL 


0288 


00 




2504 


LOD 


0292 


01 


XXXX 


2509 


UNL 


2554 


01 




2514 


UNL 


2529 


01 




2519 


LOD 


1659 


01 


0001 


2524 


ADM 


2529 


01 




2529 


SGN 




"oo ■ 


"-» BETA PLUS 3 


2534 


TRP 


2544 


00 




2539 


TR 


2554 






2544 


LOD 


0763 


01 


006~9/0&il/0&13 


2549 


ADM 


0288 


01 




2554 


RCV 






■"-• BETA PLUS 2 


2559 


TMT 


0285 


01 




2564 


LOD 


0211 


01 


0010 


2569 


TR 


0324 







PLUS ALPHA ADDRESS INDICATES 6 

FIRST ORDER TYPE 2 

REPLACE 285-288 BY CONTENTS 6 

OF LAR1. LAR2 OR UNZONED 6 

UNITS OF ALPHA-9/11/13 6 

BETA PLUS 2 6 

INSERT AS RCV ADDRESS 6 

INSERT AS SGN ADDRESS 6 

6 

CONVERT SGN TO BETA PLUS 3 3 

TEST IF ALPHA OF COMMAND IN 4 

BETA IS ZONED FOR ASU 15 2 
TR IF BETA CONTAINS ALPHA-9/ 11/ 132 

CONSTANT 6 

CONVERT ALPHA TO ASU 15 ZONING 6 

REPLACE ALPHA ADDRESS OF BETA 2 

BY ALPHA OR ALPHA-9/11/13 6 

LENGTH FOR RPL COMMAND /XTP/ 6 

TO NEXT COMMAND IN SEQUENCE 2 
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TRANSMIT COMMANDS 



TMT»TAB»TNA 



2829 LOD 0296 09 
2834 TRZ 0584 09 
2839 SGN 19 '-"ScT 
2844 ADM 19 
2849 TR 0584 



PLUSt - OR 



27/29/31 
27/29/31 



TMT IS 0» TAB IS PLUSt TNA IS - 3 
TO TMT ONLY ON 2 

REMOVE MANTISSA SIGN 4 

APPLY DESIRED SIGN TO MANTISSA 3 
RETURN TO GENERAL ROUTINE 2 



SWITCHING COMMAND 



ATR 



2354 
2859 
2864 
2869 
2874 
2879 
2884 
2889 
2894 
2899 
2904 
2909 
2914 
2919 
2924 
2929 
2934 



LOD 

CMP 

TRE 

TR 

SET 

LOD 

RCV 

TMT 

UNL 

TMT 

LOD 

ADM 

RCV 

TMT 

RCV 

TMT 

TR 



0290 11 
0298 11 
2874 
2904 
0006 13 
0296 13 
0291 
0285 13 
0290 13 
0264 11 
0210 11 
0298 11 
2921 
0331 01 
BADD 
0283 15 
0434 



XX ALPHA LIMIT 4 

COMPARE LIMIT TO TALLY 4 

TO SWAP ADDRESSES IF EQUAL 2 

TO AUGMENT TALLY IF NOT EQUAL 2 

LOAD BETA AND ITS 8 

LIMIT INTO ASU 13 8 

MOVE ALPHA AND ITS LIMIT 2 

TO BETA POSITION 8 

SWAP BETA AND ITS LIMIT 8 

00 SET TALLY TO ZERO 4 

01 AUGMENT TALLY BY 1 4 

4 

INSERT LOCATION OF THIS 2 

COMMAND IN RCV 6 

SEND MODIFIED COMMAND TO 2 

ORIGINAL LOCATION 20 

TO TRU EITHER ALPHA OR BETA 2 



CARD COMMANDS 



RCD» WCD 



2 944 


RCV 


2967 




2949 


TMT 


0289 


04 


2954 


RCV 


2999 




2959 


TMT 


0293 


09 


2 964 


RAD 


1108 


13 


2969 


SEL 


Ot J 




2974 


Ly/r] 


3509 




2979 


TRA 


2989 




2984 


TR 


0464 




2989 


TRS 


0434 




2994 


SEL 


0902 




2999 


TRS 


300U 




3004 


TR 


4119 




3 009 


SEL 


0300 




3014 


SUP 


0005 




3019 


NTR 


2974 


13 


3024 


TR 


4129 





Ell 



E12 



INSERT UNIT DESIGNATION 
AND READ/WRITE OP CODE 

INSERT UNIT DESIGNATION 
FOR ERROR ROUTINE 
000 MONITOR FOR ALLOWABLE ERRORS 

READER OR PUNCH 

TO LENGTH AND NEXT COMMAND 
TRU ON END OF FILE 
TEST FOR 

ERROR TYPE 
READ OR PUNCH ERROR 
MEMORY TO PUNCH BUFFER 
ERROR. TRY TO CORRECT 
3 TIMES 
JUST CANT GET IT RIGHT 



2 
6 

2 
3 
5 
2 

2 
2 
2 
2 
2 
2 
2 
2 
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ARITHMETIC COMMANDS 



1314 


SGN 


1450 


00 


ADD/SU8 


1319 


TR 


1369 






1324 


SGN 


1540 


00 


MPY/MMY 


1329 


ADM 


1460 


00 




1334 


TR 


1364 






1339 


SGN 


1460 


00 


PMA/MPM 


1344 


TR 


1359 






1349 


SGN 


00 v 


00 


MAD/MMA 


1354 


ADM 


1460 




— 10/12/14 


1359 


ADM 


1540 


00 




1364 


ADM 


1450 


00 




1369 


ADM 


1440 


00 




1374 


TR 


1384 






1379 


SGN 


1440 


00 


DIV/MDV 


1384 


RCV 


1421 






1389 


TMT 


0292 


01 




1394 


RCV 


1721 






1399 


TMT 


0296 


01 




1404 


RCV 


1426 






1409 


TMT 


0285 


01 




1414 


TMT 


0300 


09 




1419 


RCV 


1920 






1424 


TMT 




"08 " 


"~-BETA-9/ll/13 


1429 


TMT 




_08 


*-""• ALPHA-9/11/13 


1434 


[H/Ql 


19 T 

1108 


00 


~~~-27/29/31 


1439 


RAD 


11 




1444 


A/1 


1809 




+ + + 


1449 


ADD 


19 X~ 


Ti ' 


""— 29/31/33 


1454 


Ca/3 


1549 






1459 


RCV 


1920 






1464 


&/3 


1474 






1469 


TMT 


193" 


"oi 


"■""0/2/4 


1474 


TMT 


0245 


08 




1479 


TRZ 


1544 


00 




1484 


CMP 


1920 


02 




1489 


TRH 


1534 






1494 


MPY 


19 "~ 




*"- 27/29/31 


1499 


SHR 


oo -" 


00 


""- 07/09/11 


1504 


NTR 


151? 


00 




1509 


SHR 


0001 


00 




1514 


TR 


1524 






1519 


SUB 


0282 


11 




1524 


ADD 


19 -~ 


Tl " 


"--29/31/33 


1529 


TR 


1544 






1534 


RAD 


19 ■? 


"oo " 


"-- 27/29/31 


1539 


LOD 


1922 


n 




1544 


&/i 


1669 






1549 


TRZ 


1784 


Ofi . 




1554 


CMP 


193" 


02 


0/2/4 


1559 


TRH 


1669 






1564 


SUB 


19-"" 


Ti 


""-39/43/47 


1569 


CMP 


0303 


n 




1574 


TRH 


1779 






1579 


UNL 


1629 


ii 




1584 


UNL 


1654 


ii 




1589 


TRP 


1614 


n 




1594 


SET 


0000 


n 




1599 


ST 


19 -" 


"56 ' 


~— 27/29/31 


1604 


RAD 


19 -" 


"oo 


"■"- 37/41/45 


1609 


TR 


1624 






1614 


RCV 


1920 






1619 


TMT 


193 -" 


TJ§ ' 


""--0/2/4 



SET SW 1 TO TR 

SET SW 3 TO TR 
SET SW 2 TO NOP 

SET SW 2 TO TR 

SET SW 2 TO NOP 
WORD LENGTH 
SET SW 3 TO NOP 
SET SW 1 TO NOP 
SET SW 4 TO NOP 

SET SW 4 TO TR 
INSERT BETA 

ADDRESS 
INSERT GAMMA 

ADDRESS 
INSERT ALPHA 

ADDRESS 
INSERT PLUS OR - CODE TYPE 



4 
2 
4 
3 
2 
4 
2 
4 
3 
3 
3 
3 
2 
4 
2 
6 
2 
6 
2 
6 
3 



SEND TO TEMPORARY STORAGE THE 2 

WORD IN BETA AND THE 12.14,16 
WORD IN ALPHA 12 .14. 16 

BETA MANTISSA, PROPER SIGN 10,12 ,14 
000 SET ASU 11 TO OVERFLOW LENGTH 5 
SWITCH 4, TR TO DIVIDE 2 

OXX + POWER OF BETA 5 

SWITCH 1. TR TO APD/SUB X=+B 2 
SET MAC II TO RECEIVE Z 2 

SW. 2, TR TO SEND PAC1 TO Z 2 
SEND A EQUAL Z TO 1920 ON 12/14/16 
SEND PAC1 TO Z OR Y AREA 12/14/16 
TO SWITCH 3 IF B EQUAL 2 
IF Z EQUAL 0, TR 3 

TO SET X EQUAL TO 2 

+ B.Z EQUAL X, Z IS A OR PAC1 98,142. 19< 



X MANTISSA AT M PLUS 1 
NORMALIZE OR SHORTEN 

MANTISSA OF X 

TO M DIGITS 
X POWER - 1 IF NORMALIZED 
ADD Z POWER TO GET X POWER 



10,12,14 

4 
2 
4 
5 
2 
SET MANTISSA AND POWER OF X 10/12/14 

TO IF Z EQUALS 5 

SW 3, TR IF C EQUALS X IN 00 2 

TR TO SET C EQUAL Y IF X IS 2 

TR TO SET C EQUAL X 3 

IF Y IS 2 

X POWER - Y POWER 4 

TR IF ABS. DIFF. OF POWERS 4 

EXCEEDS MANTISSA LEN6TH 2 

INSERT ADDRESSES OF 3 

SHIFT INSTRUCTIONS 5 

TR IF ABS. X > ABS* Y 2 

AND SET ON "NEGATION 2 

STORE X MANTISSA AS SMALLER 10*12,14 

Y MANTISSA AS LARGER IN 00 10*12*14 

2 

Y MANTISSA AS SMALLER, X IS 2 

ALREADY IN 00 AS LARGER 10*12,14 
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1624 
1629 
1634 
1639 
1644 
1649 
1654 
1659 
1664 
1669 
1674 
1679 
1684 
1689 
1694 
1699 
1704 
1709 
1714 
1719 
1724 
1729 
1734 
1739 
1744 
1749 
1754 
1759 



SET 

LNG 

ADD 

TRZ 

ADD 

NTR 

SHR 

SHR 

ADD 

NTR 

TRP 

RCV 

TMT 

TR 

ST 

ST 

RSU 

TRZ 

CMP 

TRE 

RCV 

TMT 

TRZ 

ADM 

ADM 

ADM 

ADM 

TR 




09/11/13 
DIFF. POWER 
27/29/31 



DIFF. POWER 

39/43/47 

E05 



2/4/6 
4/6/8 



GAMMA-9/11/13 



0245 03 
3224 11 
1724 07 
1429 05 
1424 06 
0306 02 
1419 



1764 LNG 0001 00 
1769 SUB 0282 11 
1774 TR 1649 

1779 TRP 1799 11 

1784 RCV 0245 

1789 TMT 193 -"0"8 ^ 0/2/4 

1794 TR 1704 



1799 ADD 19 ''11 
1804 TR 1669 




39/43/47 



E01 
0/2/4 

27/29/31 
3/4/5 

3/5/7 



27/29/31 

3/4/5 

2/4/6 

37/41/45 

09/11/13 



4/5/6 



29/31/33 



LEADING BEFORE LARGER 11.13.15 

EXTEND TO ADD SMALLER 

ADD SMALLER MANTISSA 

TR TO SET PAC1 TO IF C IS 2 

001 OR DIFF. POWER PLUS 1 5 

NORMALIZE 

SHORTEN C MANTISSA TO M PLUS 

SHORTEN C MANTISSA TO M 

PLUS Y POWER EQUAL C POWER 

NORMALIZE LEGAL POWER AND TR 

TEST ILLEGAL POWER FOR OFLO 

SET PAC1 TO ON RESULT 

OR POWER UNDERFLOW 
TO INTERROGATE RPT TALLY 
STORE C MANTISSA IN PAC1 
STORE C POWER IN PAC1 
REPEAT TALLY 

TR TO SEND PAC1 TO GAMMA IF 
IF K IS AND RPT TALLY ISNT. 
DO NOT SEND PAC1 TO GAMMA 
SEND C TO GAMMA IF RPT TALLY 

IS OR K IS NOT 
TO LENGTH AND NEXT COMMAND 
AUGMENT GAMMA ADDRESS BY K. 
AUGMENT ALPHA ADDRESS BY I 
AUGMENT BETA ADDRESS BY J 
DIMINISH REPEAT TALLY 
TO REPEAT THIS COMMAND 

RESTORE TO DETERMINED LENGTH 
DECREASE C POWER BY 1 
FOR RE-NORMALIZATION 



4 

5 

6 

2 

2 

4 

2 
10.12.14 

4 

4 

2 

6 

2 

2 
12»14tl6 

2 

6 

6 

6 

4 

2 

4 
4 
2 



TR IF ABS. X 3s ABS. Y 2 

SEND C EQUAL Y TO PAC1 IF 2 

ABS. Y > ABS. X 12.14.16 
TR TO INTERROGATE RPT TALLY 2 



RESTORE X POWER TO ASU 11 
TR TO NORMALIZE LEGAL POWER 

DIVISION BY ERROR 

IF NUMERATOR IS Oi TR TO 

SET PAC1 TO 
STORE B MANTISSA IN TEMP 
SHORTEN B TO Bl 
STORE Bl 

0. (M PLUS 1) NINES 
Nl EQUAL RECIPROCAL OF Bl 
STORE Nl 



- NIB 



- Nl 




- NIB 




TO M PLUS 


2 


2 - NIB 




A TIMES 2 


- 


TO M PLUS 


1 


N1A TIMES 


2 



- NIB 



M 



10 



12 

» 



12 
14 



MANTISSA AT 1.5 

POSSIBLE SECOND 

ROUNDING AND 

ADJUST C POWER 

- B POWER OR - B POWER PLUS 1 

TO COMPLETE AND TEST C POWER 



5 
2 

2 

3 

2 
tl2»14 
6.7.8 
7.8.9 
.14.16 
383. 
7.8.9 
7.8.9 
.86. 
6.7.8 
.14.16 
170. 
.16.18 
112. 
.20. 
/10/11 

6 
5 

5 
2 
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COMPARISON AND SEARCH COMMANDS TRC»TREtTSC 



1964 


LOD 


0595 09 


1969 


TR 


1979 


197* 


LOD 


0340 09 


1979 


UNL 


2070 09 


1984 


RCV 


2145 


1989 


TMT 


0300 10 


1994 


LOD 


0295 04 


1999 


UNL 


2044 04 


2 004 


RCV 


2016 


2009 


TMT 


0296 01 


2014 


RCV 


1936 


2019 


TMT 


-"""08 ^""~- G AMMA-9/ 1 1 , 


2024 


RAD 


1945 00 


2029 


ADD 


0352 00 


2034 


UNL 


1935 00 


2039 


RCV 


1923 


2044 


TMT 


-""08 ~"* BETA-9/11/] 


2049 


RAD 


1932 00 


2054 


ADD 


0352 00 


2059 


UNL 


1922 00 


2064 


RAD 


1930 00 


2069 


SUB 


1943 00 


2074 


(n/m) 


2139 00 


2079 


LOD 


2044 04 


2084 


RCV 


244- "-0/2/4 ARG2 


2089 


TMT 


1923 08 


2094 


RSU 


0306 11 


2099 


TRZ 


3224 11 


2104 


TRP 


2114 11 


2109 


ADM 


0306 02 


2114 


ADM 


2044 06 


2119 


LOD 


0318 07 


2124 


TRZ 


2039 07 


2129 


ADM 


2019 07 


2134 


TR 


2014 


2139 


RCV 


2430 ~" -ARGI 


2144 


TMT 


1923 08 


2149 


&/il 


2224 


2154 


CMP 


1349 06 


2159 


TRE 


2179 


2164 


LOD 


1349 06 


2169 


UNL 


2044 04 


2174 


TR 


2039 


2179 


ADM 


0288 04 


2184 


UNL 


2019 04 


2189 


LOD 


0288 04 


2194 


UNL 


2204 04 


2199 


SET 


002 ^TSb -- 0/4/8 


2204 


LOD 


00 


2209 


UNL 


0254 00 


2214 


ADM 


0306 02 


2219 


TR 


3224 



N OP CODE FOR TRE 

M OP CODE FOR TRC OR TSC 

INSERT OP CODE FOR TRZ/TRP 
SET SWITCH FOR TABLE 

SEARCH OR TRANSFER 
INSERT BETA-9 

ADDRESS 
INSERT GAMMA-9 

ADDRESS 

SEND GAMMA, I.E. TESTNUM6ER. 

TO TEMPORARY STORAGE 
POWER OF GAMMA 
POWER PLUS 100 
POWER PLUS 100 IN FRONT 
SEND BETA 

TO TEMPORARY STORAGE 
POWER OF BETA 
POWER PLUS 100 
POWER PLUS 100 IN FRONT 



3 
2 

3 
3 
2 
3 
6 
6 
2 
6 



PSEUDO-GAMMA 



PSEUDO-BETA 

PSEUDO-BETA 

TEST 

LAR2 ADDRESS 

N-l TH BETA 

TO ARG2 
REPEAT TALLY 
LENGTH AND TO NEXT COMMAND 



12.14.16 
4 
5 
5 

2 

12.14.16 
4 
5 
5 

13.15.17 
13.15.17 

2 

6 

2 
12.14.16 

4 

2 



TEST FOR INDEFINITE REPEAT 
DIMINISH REPEAT TALLY IF PLUS 
AUGMENT TO NTH BETA 
LOAD K. INDEXING REGISTER 

AUGMENT TO NTH GAMMA 



2 
4 
6 
6 
2 
6 
2 



MOVE NTH BETA 

TO ARGI 
TR OUT IF NOT TABLE SEARCH 
TR IF TABLE SEARCH IS IN 

ONE WORD LENGTH JUMP STATUS 
REPLACE INCR BY 1 WORD LENGTH 
N-l TH BETA ADDRESS TO LAR1 
RETURN FOR REFINED SEARCH 



2224 TMT 1936 08 
2229 LOD 0278 11 
2234 UNL 0306 11 
2239 TR 0434 



(N-1TH BETA - 9) IN LAR2 
INSERT LOCATION OF FUNCTION 

IN LOD ADDRESS 
TO DOUBLE WORD LENGTH 
LOAD FUNCTIONS OF X AND X-l 
FUNCTIONS TO PAC1 AND PAC2 
DIMINISH REPEAT TALLY BY 1 
TO LENGTH AND NEXT COMMANDI 

CN IN ARG2 

RESET REPEAT TALLY TO 

IF TR BEFORE EXHAUSTED 
TO TRU TO ALPHA 



12.14.16 
2 
6 
2 
6 
6 
2 

6 

6 

6 

6 
22 
22 
22 

4 

2 

12.14.16 
4 

4 
2 



52n 



REPEAT COMMANDS 



RPT» RWR 



359 RCV 0249 

364 TMT 0269 00 

369 RCV 0309 

374 TMT 0289 00 

379 LOD 0310 05 

384 LOD 0314 06 

389 LOD 0318 07 

394 LOD 0222 01 
399 TR 0324 



0017 



SET PAC1 2 

TO ZERO 4 

SEND REPEAT INFORMATION 2 

TO STANDARD POSITION 4 

ALPHA INDEX INCREMENT 6 

BETA INDEX INCREMENT 6 

GAMMA INDEX INCREMENT 6 

LENGTH FOR RPT AND RWR 6 
TO NEXT COMMANDi WHICH REPEATS 2 



CONVERSION COMMANDS 



XXX 



2244 


RCV 


2286 






2249 


TMT 


0285 


01 




2254 


RAD 


0296 


12 




2259 


UNL 


2294 


12 




2264 


ADD 


0298 


12 




2269 


CMP 


3012 


12 




2274 


TRH 


4079 




E07 


2279 


UNL 


2404 


12 




2284 


RCV 


1920 






2289 


TMT 




-oli ^ 


. ALPHA-9/11/13 


2294 


RCV 


3[TWj 






2299 


TMT 


0227 


09 




2304 


RCV 


2392 






2309 


TMT 


0470 


01 




2314 


ADM 


0296 


06 




2319 


RAD 


0293 


11 




2324 


ADD 


19 


11 


29/31/33 


2329 


TRP 


2339 


11 




2334 


ADM 


2394 


11 




2339 


ADD 


0298 


11 




2344 


ADD 


0472 


11 




2349 


UNL 


2399 


11 




2354 


TRP 


2379 


11 




2359 


SGN 


0290 


09 




2364 


ADM 


0290 


09 




2369 


ADM 


2395 


02 




2374 


RSU 


0282 


02 




2 379 


SUB 


0300 


11 




2384 


TRP 


4089 


11 


E08 


2389 


RAD 


19 -^Uci >> 


27/29/31 


2394 


SET 


OXXX 


00 




2399 


Gffl 


' 




P PLUS D - M 


2404 


SPR 


3 ' 




TW PLUS D PLUS 



OXX 



2409 RSU 0306 11 

2414 TRZ 3224 11 

2419 ADM 0306 02 

2424 ADM 2289 05 
2429 TR 2254 



FXP« FPR 

SET UP TMT TO FETCH 2 

CONTENTS OF ALPHA 6 

INSERT TYPE- 2 

WHEEL ADDRESS 5 

TW PLUS D PLUS 1 5 

TEST FOR LINE OVERFLOW BY 5 

COMPARING TO 385 2 

INSERT SPR ADDRESS 5 

MOVE FLOATING POINT NUMBER 2 

TO WORKING POSITION 12|14«16 

INSERT DECIMAL POINT 2 

IN LINE IMAGE 3 

INSERT ADDRESS FOR SET 2 

AND SHIFT CODE 6 

AUGMENT TW COMMAND ADDRESS 6 

SCALE FACTOR 5 

SCALED POWER 5 

TEST FOR P i 2 

M PLUS 1 PLUS ABS. P IN SET 5 

P PLUS D PLUS 1 5 

P PLUS D - M 5 

INSERT SHIFT ADDRESS 5 

TEST IF P PLUS D =fc M 2 

SIGN OF TAG FOR FXP/FPR 4 

RESTORE TAG 3 

CONVERT D OP TO C OR E 3 

RESTORE ASU SIGN TO - 3 

P - W- 1 5 

ERROR IF P S* W PLUS 1 2 
MANTISSA OF NUMBER 10»12»14 
SET M PLUS 1* PLUS ABS. P 
SHIFT D PLUS 1» PLUS P 
STORE IN LINE IMAGE 

REPEAT TALLY 4 

LENGTH AND TO NEXT COMMAND 2 

DIMINISH REPEAT TALLY BY 1 4 

AUGMENT ALPHA AODRESS BY I 6 

TO REPEAT THIS COMMAND 2 



52o 



READ AND WRITE TAPE COMMANDS WT 1 1 RT I 
READ AND WRITE CARD ON TAPES RCD» WCD 



R LOAD OP CODE FOR WRITE 

WTM/SHR TAG FOR SWITCH 2 
I LOAD TAPE UNIT IDENT. 



SET UP FIRST ADDRESS 

FOR READ OR WRITE COMMAND 
SET SW. 1 TO WTM FOR WRITE 
SET SW. 2 TO WTM 

SET SW. 2 TO SHR IF TAG IS - 
READ/WRITE TAG FOR SW. 1 

SET SW. 1 TO SHR FOR READ 
Y CHANGE OP IN ASU 10 TO READ 
Y/R INSERT PROPER OP CODE 
SELECT ITH TAPE UNIT 
TURN OFF I/O INDICATOR 
BETA PLUS 1 ADDRESSES 



CHARACTER FROM BETA PLUS 1 
REPLACE END CHARACTER 

BY GROUP MARK 
SET MONITOR 
READ/WRITE 
REPEAT TALLY 

RESTORE LAST CHARACTER 
TEST FOR NON-REPEAT 
AUGMENT ALPHA ADDRESS 
AUGMENT LAST CHARACTER 
DIMINISH REPEAT TALLY 

WTM OR SHR 00 

LENGTH AND TO NEXT COMMAND 

TEST I/O INDICATOR 

IF 0902 IS ON 

ERROR - CHECK INDICATOR 0901 

READ/WRITE ERROR MESSAGE 
SELECT ITH TAPE UNIT 
BACKSPACE ONE RECORD 
TRANSFER TO TRY A6AIN 

TURN OFF INDICATOR 

TEST REPEAT TALLY 

EOF BEFORE RPT EXHAUSTED 

WTM OR SHR 

TR TO TRU TO ALPHA 



2574 


LOD 


1283 


10 




2579 


SGN 


0289 


00 




2564 


LOD 


0300 


09 




2589 


UNL 


2654 


09 




2594 


UNL 


2789 


09 




2599 


RCV 


2701 






2604 


TMT 


0292 


01 




2609 


SGN 


2815 


09 




2614 


SGN 


2745 


09 




2619 


TRP 


2629 


00 




2624 


ADM 


2745 


09 




2629 


SGN 


2654 


00 




2634 


TRP 


2649 


00 




2639 


ADM 


2815 


09 




2644 


LOD 


0438 


10 




2649 


UNL 


2 700 


10 




2654 


SEL 


02 0[] 






2659 


IOF 


0000 






2664 


LOD 


0299 


04 




2669 


UNL 


2684 


04 




2674 


UNL 


2689 


04 




2679 


UNL 


2719 


04 




2684 


LOD 




-59 *• 


v BETA PLUS 1 


2689 


RCV 




'09~~^ 


■v BETA PLUS 1 


2694 


TMT 


0764 


09 




2699 


SET 


0003 


00 




2704 


[Y/« 






ALPHA-9/11/ 


2709 


RSU 


0306 


11 




2714 


TRA 


2759 






2719 


UNL 




-59 - 


BETA PLUS 1 


2724 


TRZ 


2749 


11 




2729 


ADM 


2704 


05 




2734 


ADM 


0299 


06 




2739 


ADM 


0306 


02 




2744 


TR 


2664 






2749 


[3/C] 


0001 






2754 


TR 


3224 






2759 


TRS 


2804 






2764 


SEL 


0902 






2769 


TRS 


2779 






2774 


TR 


4139 




E13 


2779 


NTR 


2789 


00 




2784 


TR 


4149 




E 14 


2789 


SEL 


020 






2794 


BSP 


0004 






2799 


TR 


2704 






2804 


IOF 


0000 






2809 


TRZ 


2819 


11 




2814 


TR 


4269 




E15 


2819 


3/C 


0001 






2824 


TR 


0434 







3 
4 
3 
3 
3 
2 
6 
4 
4 
2 
3 
4 
2 
3 
3 
3 
2 
2 
6 
6 
6 
6 
3 
2 
3 
5 

4 
2 

3 
2 
6 
6 
4 
2 

2 
2 
2 
2 
2 
3 
2 
2 



52p 



WRITE COMMANDS 



WL-» WH- 



3064 


LOD 


0290 


11 




3069 


ADM 


0292 


02 




3074 


RCV 


3081 






3079 


TMT 


0331 


01 




3.084 


RCV 


^BADD) 






3089 


CMP 


0292 


11 




3094 


TRH 


3109 






3099 


LOD 


1108 


11 




3104 


UNL 


0292 


11 




3109 


TMT 


0283 


15 




3114 


TRE 


0434 






3119 


RAD 


0295 


00 




3124 


UNL 


3159 


00 




3129 


UNL 


3249 


00 




3134 


RCV 


3254 






3139 


TMT 


0299 


09 




3144 


RAD 


1108 


13 




3149 


RAD 


0298 


12 




3154 


UNL 


3164 


12 




3159 


SEL 


dxx)j! 

3&CXX] 






3164 


WR 


00 




3169 


TRA 


3234 






3174 


RCV 


3387 






3179 


TMT 


0300 


09 




3184 


RCV 


3265 






3189 


TMT 


0300 


09 




3194 


TRP 


3214 


12 




3199 


SET 


0026 


00 




3204 


TMT 


2935 


14 




3209 


NTR 


3204 


00 




3214 


TRP 


3224 


00 




3219 


WR 


2458 


00 




3224 


LOD 


0226 


01 




3229 


TR 


0324 






3234 


SEL 


0902 






3239 


TRS 


3249 






3244 


TR 


4099 




E09 


3249 


SEL 


OXXX 






3254 [ 1 OOC 




\ 4 OR 5 


3259 


NTR 


3164 


13 




3264 


TR 


4109 




E10 



00 OR XX LINE COUNT 

AUGMENT LINE TALLY 
INSERT BADD 

AS AN ADDRESS 
SET TO RECEIVE MODIFIED COMM. 
COMPARE LINE COUNT WITH TALLY 
WRITE LINE IF HIGH 
RESET TALLY IF EQUAL LINE COUNT 

RESTORE MODIFIED COMMAND 
TRU TO ALPHA ON NO LINE 
UNIT DESIGNATION 



+ 
00 



INSERT BSP OR SUP CONTROL 
ADDRESS CHARACTER 
000 SET MONITOR FOR ERROR 
XXX ± LINE OR HDG ADDRESS INSERT 
INSERTED IN WRITE COMMAND 
WRITE A LINE OR HDG 
ON TAPE OR PRINTER 

INSERT CARRIAGE CONTROL 

CHARACTER IN 

LINE AND 

HEADING IMAGES 
TEST IF LINE OR HDG 
SET LINE IMAGE 

TO BLANK IF A 

LINE WAS WRITTEN 
TEST FOR TRIPLE SPACING 
EXTRA SPACE FOR TRIPLE 
0018 COMMAND LENGTH 

TO NEXT COMMAND IN SEQUENCE 

TEST FOR WRITING ERROR 

FROM MEMORY TO BUFFER 
ERROR MESSAGE FOR I/0i901»903 
SELECT TAPE OR PRINTER 
BSP OR SUP 
TEST ERROR .ONITOR 
E MESSAGE ON EXHAUSTED MONITOR 



4 
4 
2 
6 
2 
4 
2 
4 
4 
20 
2 
5 
5 
5 
2 
3 
5 
5 
5 
2 

2 
2 
3 
2 
3 
2 
28 
7 



CONTROL COMMANDS 



3974 RCV 3994 
3979 TMT 0285 09 
3984 TMT 0286 14 
3989 RAD 0293 13 
3994 SEL 020 
3999 3 000 
4004 SUB 0282 13 
4009 TRZ 0464 13 
4014 TR 3999 



BSIi RWlt TMI 

INSERT SELECT 

ADDRESS AND 

CONTROL INSTRUCTION 
COUNT FOR BACKSPACING 



REDUCE COUNT BY 1 

LENGTH AND TO NEXT COMMAND 

TO BACKSPACE AGAIN 



52q 



8-DIGIT SQUARE ROOT ROUTINE 



SQR 



3594 


RAD 


1583 


00 


3599 


MPY 


1929 


00 


3604 


ST 


1930 


00 


3609 


SHR 


0001 


00 


3614 


ST 


1929 


00 


3619 


RSU 


1927 


00 


3624 


TRZ 


0574 


00 


3629 


TRP 


4049 


00 


3634 


RAD 


1930 


09 


3639 


TRZ 


3674 


09 


3644 


TRP 


3654 


09 


3649 


TR 


3659 




3654 


ADM 


1929 


02 


3659 


LOD 


1111 


09 


3664 


SET 


0009 


00 


3669 


TR 


3679 




3674 


LNG 


0001 


00 


3679 


ST 


1939 


00 


3684 


UNL 


1930 


09 


3689 


SHR 


0005 


00 


3694 


ST 


1953 


00 


3699 


SHR 


0002 


00 


3704 


LOD 


0380 


11 


3709 


RCV 


3723 




3714 


TMT 


1037 


11 


3719 


ADM 


3724 


11 


3724 


CMP 


39[] 


00 


3729 


TRH 


3719 




3734 


RCV 


3748 




3739 


TMT 


3723 


11 


3744 


RCV 


1940 




3749 


TMT 


39[] 


08 


3754 


RSU 


1943 


00 


3759 


MPY 


1953 


00 


3764 


SHR 


0002 


00 


3769 


ADD 


1946 


00 


3774 


ST 


3898 


00 


3779 


RSU 


1939 


00 


3784 


SHR 


0001 


00 


3789 


DIV 


3898 


00 


3794 


SON 


3898 


10 


3799 


ADD 


3900 


00 


3804 


ST 


1945 


00 


3809 


RAD 


1583 


00 


3814 


MPY 


1945 


00 


3819 


SHR 


0001 


00 


3824 


ST 


3906 


00 


3829 


MPY 


3906 


00 


3834 


SHR 


0001 


00 


3839 


ADD 


1939 


00 


3844 


SET 


0006 


00 


3849 


LNG 


0005 


00 


3854 


DIV 


1945 


00 


3859 


SGN 


3906 


09 


3864 


SUB 


3910 


00 


3869 


RND 


0001 


00 


3874 


NTR 


3884 


00 


3879 


TR 


0584 




3884 


UNL 


1927 


00 


3889 


ADM 


1927 


09 


3894 


TR 


0584 





E04 



• 5 
PP.X 

PP 

.XXXXXXXX^ 

5 0R01 



.oxxxxxxxx- 
.xxxxxxxxo- 

.xxxx- 

.XX- 

08 



X.X- 
O.XXXXX 
O.XXX 
X.XXX 

O.XXXXXXXXX 

O.XXXXXXXX 

•XXXXX 

X.XXXXX 



X.XXXXXX 
X.XXXXX 

OX.XXXXXXXXXX 

OX.XXXXXXXXX 

OO.OOOOXXXXX 

OXXXXX 

OXXXXXOOOOO 

XXXXX 

O.XXXXXXXXX- 

X.XXXXXXXX- 

.XXXXXXXX- 



X IS OR 5 PLUS OR - 
POWER DIVIDED BY 2 

UNITS AND DECIMAL BOTH SIGNED 

MINUS MANTISSA 

SQUARE ROOT EQUAL 

ERROR MESSAGE FOR SQR OF - 

PLUS OR - 

TR ON EVEN POWER 

INCREASE ON ODD AND PLUS ONLY 



SADMi CORRECTED POWER 
ASU 09 IS IN BOTH CASES 



AVERAGE 13 



- ARG FOR LINEAR APPROX. 
ARGUMENT FOR TLU 
INCREMENT FOR TLU 
INITIALIZE CMP COMMAND 

TO ADDRESS OF 3904 
START SEARCH AT 3912 

AVERAGE 45 
INSERT ADDRESS OF SEGMENT 

INTO TMT COMMAND 
MOVE SEGMENT COEFFICIENTS TO 

WORKING POSITION tW .L.) 
-A 
AX 

1ST APPROX. » EQUALS AX PLUS B 

Al 

ARGUMENT 

Ql 

LNG Al 0002 IN MEMORY 

Al PLUS Ql APPROX. 2A2 



A2 WITHIN .0005 OF SQR N 

A2 

A2 SQUARED 




A2 SQUARED 



N 



-.5 DELTA 

LNG A2 0004 IN MEMORY 

-A2 -.5 DELTA IS APPROX. SQR N 



SQR .99999999 WITH EVEN POWER 

UNSIGNED MANTISSA 

PLUS SIGN 

RETURN TO GENERAL ROUTINE 



3 
8 
5 

4 
4 
10 
2 
2 
3 
2 

2 

4 
3 

11 
2 
4 

11 
3 
8 
6 
5 
4 
2 
4 

2 
4 
2 

12 
4 

18 
5 
6 
6 

12 
4 
245 
4 
8 
8 
3 

12 
4 
6 

62 
4 

13 

8 

8 

321 

4 

12 
6 

11 

10 
3 

2 



52r 



8-DIGIT LOGARITHMS 



LGD, LGE 



4019 


SET 


OOOO 


13 


4024 


SET 


0010 


13 


4029 


RSU 


1927 


OQ. 


4034 


TRP 


(40Ml 


00 


4039 


ST 


1927 


00 


4044 


SHR 


0007 


00 


4049 


MPY 


4390 


00 


4054 


SUB 


4403 


00 


4059 


UNL 


4079 


00 


4064 


UNL 


4084 


00 


4069 


LOD 


3969 


12 


4074 


ADM 


4079 


12 


4079 


AODL U 


13 


4084 


RADL 3 


00 


4089 


MPY 


1927 


00 


4094 


RND 


0001 


00 


4099 


NTR 


4039 


00 


4104 


SET 


0008 


00 


4109 


ST 


1927 


00 


4114 


ST 


1939 


13 


4119 


RSU 


2858 


00 


4124 


MPY 


1927 


00 


4129 


RND 


0005 


00 


4134 


ADO 


4285 


00 


4139 


MPY 


1927 


00 


4144 


RND 


0006 


00 


4149 


ADD 


4292 


00 


4154 


MPY 


1927 


00 


4159 


RND 


0007 


00 


4164 


ADD 


4300 


00 


4169 


MPY 


1927 


00 


4174 


RND 


0007 


00 


4179 


SUB 


1939 


00 


4184 


ST 


1939 




4189 


RAD 


1929 


00 


4194 


LNG 


0009 


00 


4199 


ADD 


1939 




4204 


RND 


0001 


00 


4209 


LOD 


0296 


09 


4214 


TRZ 


4229 


09 


4219 


MPY 


4413 


00 


4224 


RND 


0009 


00 


4229 


SET 


0011 


00 


4234 


TRZ 


0574 


00 


4239 


LOD 


0032 


11 


4244 


NTR 


4269 


00 


4249 


RND 


0003 




4254 


ST 


1927 


00 


4259 


ST 


1929 


11 


4264 


TR 


0584 




4269 


LNG 


0001 


00 


4274 


SUB 


0388 


11 


4279 


TR 


4244 





-E02 



0. 000000000 

.xxxxxxxx 



x.x 



iOXXXXXXX 



•09 



x.xxxxxxxxx 
.xxxxxxxxx 

XX. 000000000 

XX. XXXXXXXXX 

XX. XXXXXXXX 



XXX. XXXXXXXX 

03 

•XXXXXXXX 

XX 



INITIALIZE MPLR LOG ACCUM. 
- MANTISSA OF ARGUMENT 
ERROR FOR LOG OF OR - NUM. 
START OF MPLR LOOP 
LEADING DIGIT 
BY TABLE INCREMENT OF 11 
MAKE TABLE ADDRESS 
INSERT ADDRESS FOR 

MPLR AND LOG OF MPLR 
ADDRESS CONVERSION INCREMENT 
BOTH ADDRESSES COMPLETE 
ACCUMULATE LOGS OF MPLRS 
MULTIPLIER 
CONVERT ARGUMENT 
TO MANTISSA LENGTH 
RETURN IF LESS THAN 1.0 
ARGUMENT FOR 

POLYNOMIAL APPROXIMATION 
STORE LOG SUM 
4TH ORDER COEFFICIENT 



3RD ORDER COEFFICIENT 



2ND ORDER COEFFICIENT 



1ST ORDER COEFFICIENT 



LOGARITHM OF 

DECIMAL NUMBER 
POWER 



TAG TO DETERMINE BASE 
BYPASS CONVERSION IF BASE 10 

BACK TO 8 DECIMALS 

IF LOG IS ZERO 
BASE POWER 

TO MANTISSA LENGTH 

STORE MANTISSA 

STORE ADJUSTED POWER 

EXIT TO GENERAL SUB-ROUTINE 



2 

12 

10 

2 

10 

10 

8 

5 

5 

5 

5 

5 

12 

4 

26 

6 

11 

10 

10 

12 

3 

14 

10 

7 

62 

11 

9 

86 

12 

10 

98 

11 

11 

11 

4 

12 

13 

6 

3 

2 

142 

14 

13 

2 

4 

14 

8 

10 

4 

2 



RESTORE TO 11 CHAR. AFTER NTR 4 
REDUCE BASE POWER 4 

TO TRY NTR AGAIN 2 



52s 



8-DIGIT EXPONENTIAL 



4874 


RAD 


1927 




4879 


LN6 


0002 




4884 


LOD 


0296 


09 


4889 


TRZ 


4909 


09 


4894 


MPY 


5432 




4899 


NTR 


5269 




4904 


RND 


0008 




4909 


RAO 


1929 


13 


4914 


SUB 


5399 


13 


4919 


TRP 


4159 


13 


4924 


ADO 


4845 


13 


4929 


TRP 


4939 


13 


4934 


TR 


5289 




4939 


SUB 


0262 


13 


4944 


UNL 


4949 


13 


4949 


SHR 


oot3 




4954 


SET 


0010 




4959 


ST 


1929 




4964 


SET 


0008 




4969 


SGN 


1929 


09 


4974 


ADM 


1921 


09 


4979 


ADM 


1929 


09 


4984 


RAD 


1921 


13 


4989 


CMP 


3095 


13 


4994 


TRH 


4159 




4999 


TRP 


5029 




5 004 


ADD 


5408 




5009 


SET 


0008 




5014 


ST 


1929 




5019 


RAD 


5459 


13 


5024 


ADM 


1921 


13 


5029 


LOD 


1922 


09 


5034 


UNL 


5044 


09 


5039 


UNL 


5194 


09 


5044 


RSU 


539[] 




5049 


MPY 


5416 




5054 


ADD 


1929 




5059 


SET 


0008 




5064 


MPY 


5424 




5069 


SHR 


0007 




5074 


SET 


0008 




5079 


ST 


1929 




5084 


SHR 


0007 




5089 


MPY 


4845 




5094 


ADD 


5463 




5099 


UNL 


5199 




5104 


ADD 


0338 




5109 


UNL 


5114 




5114 


RSU 


t ] 




5119 


ADD 


1929 




5124 


ST 


1929 




5129 


MPY 


5380 




5134 


SHR 


0007 




5139 


ADD 


5438 




5144 


MPY 


1929 




5149 


SHR 


0006 




5154 


ADD 


5388 




5159 


MPY 


1929 




5164 


SHR 


0008 




5169 


ADD 


5447 





E16 



E16 



MANTISSA 

OR 1 TAG FOR BASE 
FOR DECIMAL 
BASE E MPY BY 
LOG E BASE 10 

TEST EXPONENT 
MINUS 3 
ERROR MESSAGE 
EXP-3+U 

BY PASS CALC ANS=1 
USE EXP-2 
TO CONVERT TO 
FIXED POINT 



PLACE SIGN ON 

EXOPNENT 

MANTISSA 

MAX ARG =98.XXXX 

ERROR MESSAGE 
MANTISSA SIGN 
NEG ADD ONE 

1-X 

DECREASE EXP 

BY 1 

LEADING DIGIT LOOK-UP 



0»l»2i OR 3 TIMES 

LOG 2 BASE 10 SUBTRACT 

FROM ARGUMENT 

LOG 10 BASE E 

FOR 

BASE E 

TLU 0»1.2...»6 
TIMES TABLE INCREMENT 
PLUS TABLE ORIGIN 
FOR ADDRESSES TO 
EXTRACT 
TABLE ENTRIES 
TABLE VALUE SUBT 
FROM ARGUMENT 
POLYNOMIAL ARGUMENT 
5TH ORDER COEFF 

4TH ORDER COEFF 



3RD ORDER COEFF 



2ND ORDER COEFF 



10 

5 

4 

2 

122 

21 

13 

4 

4 

2 

4 

2 

2 

4 

4 

13 

12 

12 

10 

3 

3 

3 

4 

4 

2 

2 

11 

10 

10 

4 

4 

3 

3 

3 

3 

14 

11 

10 

98 

10 

10 

10 

10 

8 

6 

6 

6 

6 

10 

10 

10 

74 

10 

8 

74 

9 

10 

98 

11 

11 



52t 



5174 


MPY 


1929 




5179 


SHR 


0008 




5184 


ADO 


5408 




5189 


ST 


1930 




5194 


RAD 


130H 




5199 


MPY 


[ ] 




5204 


MPY 


1930 




5209 


SHR 


0002 




5214 


SET 


0010 




5219 


RAD 


5396 


13 


5224 


NTR 


5254 




5229 


ADD 


1921 


13 


5234 


ST 


1929 


13 


5239 


RND 


0002 




5244 


ST 


1927 




5249 


TR 


0564 




5254 


SUB 


5393 


13 


5259 


LNG 


0001 




5264 


TR 


5224 




5269 


RND 


0007 




5274 


RSU 


5393 


13 


5279 


ADM 


1929 


13 


5284 


TR 


4909 




5289 


RCV 


1920 




5294 


TMT 


5448 


08 


5299 


TR 


0584 





1ST ORDER COEFF 

1»2.4» OR 8 
TIMES TABLE VALUE 
TIMES POLYNOMIAL VALUE 



FLOATING PT CONVERSION 



EXPONENT 

MANTISSA 

EXIT 

NORMALIZING 



ARGUMENT SHIFTED 
EXPONENT DECREASED 
BY 

SET ANSWER TO ONE 



110 
11 

11 

11 
3 
9 

54 
5 

12 
3 

13 
4 
4 
7 

10 
2 
3 
4 
2 

12 
3 
3 
2 
2 

12 
2 



8-DIGIT ARC TANGENT 



5469 


RAD 


1927 




5474 


TRZ 


0584 




5479 


TRP 


5489 




5484 


RSU 


1927 




5489 


ST 


6908 




5494 


RAD 


1929 


03 


5499 


CMP 


0303 


03 


5504 


TRH 


5894 




5509 


CMP 


0210 


03 


5514 


TRH 


5864 




5519 


TRP 


5559 


03 


5524 


SET 


0009 




5529 


UNL 


5534 


03 


5534 


SHR 


oot] 




5539 


SET 


0008 




5544 


RAD 


0593 


13 


5549 


ST 


1944 


13 


5554 


TR 


5724 




5559 


UNL 


5564 


03 


5 564 


LNG 


00[] 




5569 


SHR 


0006 




5574 


SET 


0003 




5579 


RCV 


5596 




5584 


TMT 


6047 


04 


5589 


LOD 


0222 


04 


5594 


ADM 


5599 


04 


5599 


CMP 


C ] 




5604 


TRH 


5594 




5609 


LOD 


5599 


04 


5614 


ADD 


3939 


04 


5619 


UNL 


5629 


04 


5624 


SET 


0014 







10 


EXIT ON ZERO 


2 




2 




10 




10 


TEST RANGE OF EXP 


4 


8 


4 




2 


1 


4 




2 




2 




11 


USE EXPONENT OT 


4 


CONVERT TO FXD PT 


6 


LET G-X 


11 


ZERO FOR 


3 


ARCTAN X SUB N 


3 


BY-PASS TLU 


2 


USE EXP TO 


4 


CONVERT TO FXD PT 


4 


PREPARE ARGUMENT 


9 


FOR TLU 


5 


INITIALIZE 


2 


TLU ADDRESS 


5 


TABLE INCREMENT <17) 


5 


TLU 


5 




5 




2 


EXTRACT AND 


5 


INCREASE 


5 


TABLE ADDRESS 


5 


EXTRACT ENTRY 


16 



52u 



5629 


LOD I ] 




5634 


UNL 


1944 




5639 


RAD 


1934 




5644 


MPY 


6908 




5649 


SHR 


0002 




5654 


ST 


1953 




5659 


UNL 


5669 


03 


5664 


RAD 


5408 




5669 


SHR 


ooU 




5674 


ADD 


1953 




5679 


ST 


1953 




5684 


RSU 


1934 




5689 


LNG 


0006 




5694 


UNL 


5699 


03 


5699 


SHR 


oot J 




5704 


ADD 


6908 




5709 


SET 


0009 




5714 


LNG 


0008 




5719 


DIV 


1953 




5724 


ST 


1953 




5729 


MPY 


1953 




5734 


SHR 


0008 




5739 


ST 


6908 




5744 


RAD 


6020 




5749 


MPY 


6908 




5754 


SHR 


0005 




5759 


ADD 


6027 




5764 


MPY 


6908 




5769 


SHR 


0006 




5774 


ADD 


6037 




5779 


MPY 


1953 




5784 


SHR 


0008 




5789 


ADD 


1944 




5794 


TRZ 


0584 




5799 


RAD 


5457 


13 


5804 


NTR 


5849 




5809 


SHR 


0002 




5814 


ST 


6908 




5819 


ST 


1929 


13 


5824 


SGN 


1927 


13 


5829 


TRP 


5839 


13 


5834 


RSU 


6908 




5839 


ST 


1927 




5844 


TR 


0584 




5849 


SUB 


0282 


13 


5854 


LNG 


0001 




5859 


TR 


5804 




5864 


TRP 


5874 




5869 


TR 


5524 




5874 


SET 


0014 


13 


5879 


RCV 


1931 




5884 


TMT 


6004 


13 


5889 


TR 


5639 




5894 


TRP 


5904 


03 


5899 


TR 


0584 




5904 


RAD 


5457 


13 


5909 


RAD 


6045 




5914 


TR 


5814 







16 




16 


TABLE ARGUMENT 


5 


TIMES MANTISSA 


38 
5 

11 




EXPONENT TO ADJUST 


4 


POWER OF TEN- 


11 


IN SCALING 


4 


PLUS PRODUCT 


11 




11 


MINUS TABLE VALUE 


5 


SHIFTED LEFT 


9 


EXPONENT TO 


4 


SCALE TABLE VALUE 


4 


PLUS ARGUMENT 


11 


PREPARE 


11 


NUMERATOR TO DIVIDE 


11 


QUOTIENT IS G 


688 


STORE G 


10 


G SQUARED 


98 




11 


POLYNOMIAL 


10 


A2 


6 


TIMES G SQUARE 


50 


SHIFTED 


8 


Al 


9 


TIMES G SQUARE 


86 


SHIFTED 


009 


AO 


11 


TIMES G 


110 


SHIFTED 


11 


PLUS TABLE ARCTAN 


11 


ARCTAN X=X 


2 


CONVERT TO 


3 


FLOATING PT 


13 


RETAIN 8 DIGIT MANT 


5 


STORE MANTISSA 


10 


EXPONENT 


4 


TEST INPUR ARG SIGN 


3 


NEG INPUT 


2 


NEG ANSWER 


10 


MANTISSA STORED 


10 


EXIT 


2 


DECREASE EXPONENT 


3 


SHIFT MANTISSA 


4 


RETURN TO NORMALIZE 


2 


TEST SIGN OF EXP 


2 


NEG G=X 


2 


EXTRACT LAST 


15 


TABLE ENTRY 


2 


FOR G CALCULATION 


15 


BYPASS TLU 


2 


TEST SIGN OF EXP 


2 


EXIT FtX)=X 


2 


ANSWER IS 


4 


PI/2 


10 


GO TO OUTPUT ROUTINE 


2 



52v 



SINE AND COSINE COMMAND 



SAC 



6059 


LOD 


6797 


09 


6064 


UNL 


6630 


09 


6069 


RAD 


1929 




6074 


CMP 


6805 




6079 


TRH 


6719 




6084 


SUB 


1306 




6089 


TRP 


4259 




6094 


ADD 


1300 




6099 


UNL 


6124 




6104 


RAD 


1927 




6109 


TRP 


6119 




6114 


RSU 


1927 




6119 


LNG 


0003 




6124 


SHR 


00 




6129 


SET 


0011 




6134 


MPY 


6877 




6139 


RND 


0008 




6144 


SET 


0009 




6149 


ST 


1938 




6154 


RAD 


6886 




6159 


SUB 


1938 




6164 


TRP 


6224 




6169 


ADD 


6895 




6174 


TRP 


6199 




6179 


RAD 


1938 




6184 


SUB 


6835 




6189 


SET 


0009 




6194 


TR 


6244 




6199 


RAD 


6886 




6204 


SUB 


1938 




6209 


LOD 


6744 


09 


6214 


UNL 


6630 


09 


6219 


TR 


6244 




6224 


SUB 


6895 




6229 


TRP 


6239 




6234 


TR 


6199 




6239 


RAD 


1938 




6244 


MPY 


1306 




6249 


SET 


0010 




6254 


ST 


1939 




6259 


RCV 


6282 


12 


6264 


TMT 


6050 


12 


6269 


RAD 


6898 


12 


6274 


SHR 


0008 




6279 


ADM 


6284 


12 


6284 


CMP 


6 




6289 


TRH 


6279 




6294 


TRE 


6279 




6299 


RCV 


6312 


12 


6304 


TMT 


6282 


12 


6309 


SET 


0019 




6314 


LOD 


6 




6319 


UNL 


1959 




6324 


RAD 


1939 




6329 


TRP 


6349 




6334 


RSU 


1927 


13 


6339 


ST 


1927 


13 


6344 


RSU 


1939 




6349 


SUB 


1951 





E03 



COSINE SWITCH IS 
INITIALIZED TO NOP 
TEST EXPONENT 
FOR 7 OR LESS 

X-46 
ERROR 



MANTISSA 

USE POSITIVE ARGUMENT 

PREPARE TO 

CONVERT TO FIXED PT 

2 PI INVERSE 

DISCARD INTEGRAL PT 
FRACTION OF 2PI 
QUADRANT REDUCTION 
• 5-X 



4TH QUAO 
X-l 



2ND OR 3RD QUAD 
• 5-X 

COSINE SWITCH TO TR 
FOR NEG ANSWER 



1ST QUAD USE X 

4X FOR 

FRACTION OF PI/2 

INITIALIZE TLU 
CMP ADDRESS 
TABLE INCREMENT 
TABLE LOOK UP DIGITS 
TLU ON 
0.1«0.3»0.i>»0.7»0.9»9. 



USE COMP ADDRESS 
TO EXTRACT 

TABLE 



FRACTION OF PI OVER 2 

FOR QUAD 3*4 

SINE WILL BE MINUS 

ARGUMENT 

MINUS TABLE VALUE 



3 

3 

4 

4 

2 

4 

Z 

4 

4 

10 

2 

10 

6 

11 

13 

123 

13 

11 

11 

11 

11 

2 

11 

2 

11 

12 

11 

2 

11 

11 

3 

3 

2 

11 

2 

2 

11 

47 

12 

12 

2 

5 

5 

10 

5 

9 5 

2 

2 

2 

5 

21 

5 

5 

12 

2 

10 

10 

12 

12 



52w 



6354 


RND 


0001 


6359 


SET 


0008 


6364 


ST 


1939 


6369 


MPY 


1939 


6374 


RND 


0008 


6379 


ST 


1951 


6384 


RAD 


1309 


6399 


MPY 


1951 


6394 


RND 


0005 


6399 


ADD 


6859 


6404 


MPY 


1951 


6409 


RND 


0005 


6414 


ADD 


6868 


6419 


MPY 


1939 


6424 


RND 


0008 


6429 


ST 


1939 


6434 


RAD 


6847 


6439 


MPY 


1951 


6444 


RND 


0006 


6449 


ADD 


6854 


6454 


MPY 


1951 


6459 


RND 


0006 


6464 


ADD 


5408 


6469 


ST 


1951 


6474 


RAD 


1954 


6479 


MPY 


1951 


6484 


RND 


0002 


6489 


ST 


6908 


6494 


RAD 


1957 


6499 


MPY 


1939 


6504 


RND 


0002 


6509 


ADD 


6908 


6514 


TRZ 


6689 


6519 


RAD 


2252 13 


6524 


NTR 


6659 


6529 


ST 


1929 13 


6534 


SHR 


0002 


6539 


RAD 


1927 13 


6544 


TRP 


6559 13 


6549 


ST 


6908 


6554 


RSU 


6908 


6559 


ST 


1927 


6564 


RAD 


1954 


6569 


MPY 


1939 


6574 


RND 


0002 


6579 


ST 


6908 


6584 


RAD 


1957 


6589 


MPY 


1951 


6594 


RND 


0002 


6599 


SUB 


6908 


6604 


TRZ 


6704 


6609 


RAD 


2252 13 


6614 


NTR 


6674 


6619 


SHR 


0002 


6624 


ST 


1937 


6629 


ST 


1939 13 


6634 


A/1 


6644 


6639 


TR 


6914 


6644 


RSU 


1937 



EQUALS 


6 


POLY NOMIAL 


10 


ARGUMENT Z 


10 


SQUARE OF 


98 


POLYNOMIAL 


10 


ARGUMENT Z 


10 


SINE POLYNOMIAL 


3 




14 




7 




7 




62 




7 




11 




110 




10 




11 


COSINE POLYNOMIAL 


6 




50 




8 




9 




79 




8 




11 




11 


SINE Y 


5 


TIMES COS Z 


41 




4 




12 


COS Y 


5 


TIMES SINE Z 


41 




4 


SINE X 


12 




2 


PREPARE TO 


4 


NORMALIZE 


13 


STORE EXPONENT 


4 


TRUNCATE TO 8 DIGITS 


10 


TEST INPUT 


10 


FOR SIGN 


2 


CHANGE 


10 


SIGN 


10 


STORE MANTISSA 


10 


SINE Y 


5 


TIMES SIGN Z 


41 




7 




12 


COS Y 


5 


TIMES COS Z 


41 




7 



COS X 

PREPARE TO 

NORMALIZE 

TRUNCATE TO 8 DIGITS 

STORE MANTISSA 

EXPONENT 

SWITCH FOR COS IN 2»3Q 

EXIT 

CHANGE COS SIGN 



52x 



6649 


ST 


1937 




6654 


TR 


6639 




6659 


LNG 


0001 




6664 


SUB 


5393 


13 


6669 


TR 


6524 




6674 


LNG 


0001 




6679 


SUB 


5393 


13 


6684 


TR 


6614 




6689 


RCV 


1920 




6694 


TMT 


0265 


08 


6699 


TR 


6564 




6704 


RCV 


1930 




6709 


TMT 


0265 


08 


6714 


TR 


6639 




6719 


TRP 


4259 




6724 


SET 


0000 




6729 

9 


TR 


6129 




6914 


LOD 


0282 


01 


6919 


RCV 


6926 




6924 


TMT 


0296 


01 


6929 


RCV 






6934 


TMT 


1930 


08 


6939 


ADM 


6929 


07 


6944 


TR 


0584 





E03 



FOR QUAD 2.3 

NORMALIZE 
FOR SINE X 

NORMALIZE 
FOR COS X 

SET 
SIN X«0 

SET 
COS X=0 

ERROR MSG ON PLUS 
SET X=0 
ON MINUS 



COMMAND LENGTH 

SET UP RCV TO STORE 

COSINE IN GAMMA 



GAMMA-9/11/13 



12.14,16 
AUGT. GAMMA ADDS. BY K 6 
TO EXIT 2 



52y 



Appendix II— Example I 



Generalized 

matrix 

multiplication 



The coding symbolized here is a basic method to effect the multiplication 
of a (k by m) matrix and an (m by n) matrix to produce the product matrix 
(k by n). It is valid when sufficient memory locations can be reserved for 
the elements of all three matrices. Many of the features of print i as applied 
to repetitive operations are illustrated in this general method. 

The common practice in assigning memory to the elements of a matrix 
is to store them row-by-row in sequential addresses. In this case these sequen- 
tial addresses are regional for convenience. The general elements of these 
matrices are to be in locations defined as: 



Matrix Location 

(k by m) A001 + (row-1) (m) + (col-1) 

(mbyn) B001 + (row-1) (n) + (col-1) 

(kbyn) C001 + (row-1) (n) + (col-1) 

The program is generally written as below, with the proper numbers replac- 
ing k, m and n. All operations are shown with referrals in the location column, 
but steps 3, 4 and 8 are the only ones which need it. 



LOCATION 
6- -10 


OPERATION 
CODE 

II- -13 


VARIABLE FIELD COMMENTS 
14- -80 


STEP 1 


SR 1 





STEP 2 


SR 2 


0, km 


STEP 3 


SR3 


0, n 


STEP 14 


RWR 


m, 1, n 


STEP J 5 


MAD 


A001, 2, B001, 3, C001, 123 


STEP 6 


TX 3 


STEP 4, 1 


STEP \7 


TN 1 


STEP 8, (n - m) 


STEP 18 


TX2 


STEP 3, m 



If either of the two matrices to be multiplied are square, it should be used 
as the multiplicand. Under these conditions the 1st and 7th steps may be 
eliminated because m = n. Elements are computed row-wise in the example, 
for efficient storage, but the problem could be re-coded to develop them 
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column-wise. Printing of a row at a time during calculation is possible by 
inserting the necessary operations between steps 6 and 7, or 7 and 8. 

A coding kernel is given here for matrix multiplication using tapes for input 
of elements. This is again for the multiplication of a (k by m) matrix by a 
(m by n) matrix. The (k by m) matrix is assumed to be stored on tape 0207 
in k records, each record consisting of the m elements of a row. The (m by n) 
matrix is assumed to be stored on tape 0208 in n records, each record con- 
sisting of the m elements of a column. The first row and column are the 
first records of the respective tapes, etc. The product matrix is to be stored 
in row records on tape 0209. 



LOCATION 

■ 10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD COMMENTS 
14- -80 


R0WS| 


RT7 


A001 m elements in each of k rows 




SR2 


0,n 


C0LS j 


RT8 


B001 m elements In each of n columns 




RWR 


m, 1 , 1 




MAD 


A001 ,6001,0001, 2 




TX2 


C0LS , 1 




WT9 


COO 1, COO n 




RW8 






ATR 


R0WS,(k-l),NXTCM, 1 


MXTCJW 







Appendix II— Example II 



Three examples of efficient coding for polynomial evaluation are illustrated 
below. As a general rule, requiring more instructions than are shown here 
will indicate inefficient assignment of memory for arguments and coefficients. 
The programmer who has occasion to use this type of coding may profit by 
extension of these examples. 
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Evaluating a Single Polynomial at N Arguments (N = 14) 

6 Arguments X located in K203 (2) K229 

P(X) = Y\ a, X 1 P (X)s to be sent to K204 (2) K230 

"""* (D006 + i) 







Coefficients a, in 



Evaluating N Polynomials at a Single Argument (N = 5) 
6 Argument X located in K203 

Pj(X)= Y\ ( a jX X ' Pj (X)s to be sent to (D013 + 8J) 

Coefficients (a^ in (D006 + i + 8j) 



Evaluating the Bi-variate Surface 
i = 4 



Z- 



J = 



a, Y 1 



where a, = 



b,X 



i=0 j=0 

a, are in (C005 + 5i), b„ are in (C001 + 5i + j), X is in C026, 
Y is in C027 and the answer Z is to be placed in C028. 



LOCATION 
6- -10 


OPERATION 
CODE 

II- -13 


VARIABLE 
14- 


FIELD 


COMMENTS 
-80 


1 




SRI 


0,28 






vlXTAR 


RWR 


7,-1 








PMA 


D012,K203, 1, K204, 1 








TX1 


NXTAR , 2 








SRI 


0,40 




t 


NXTP h 


1 RWR 


7,-1 








PMA 


D012, 1, K203,D013, 1 








TX1 


NXTPN , 8 








SR2 


0,25 




! r 


4XTC0 


RWR 


4,-1 








PMA 


C004,2,C026,C005,2 








TX2 


NXTC0 , 5 








RWR 


5.-5 








PMA 


C025,C027,C028 
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Appendix II— Example HI 



Matrix The coding kernel below gives a simple method for the inversion of a matrix 

inversion and solution of simultaneous equations. It is adopted from R. DeSio's 650 

program, using Jordan's method. The nth order matrix with b column vectors 
furnishes the array: 

an a 12 ais a i4 a ln V u V 12 V13 V lb 

32i a 2 2 a 2 3 a 2 4 a 2n V 2 i V 22 V 2 3 V 2b 



a nl a n2 a nn Vni V n2 V n b 

This array is stored row-wise in memory from A001 to A000 + n(n -f- b), each 
row starting at A00 1 + (row— 1 ) (n + b). A00 1 + n (n + b) thru A000 + (n -f 1) 
(n — b) are reserved as working storage, for a total of (n -f- 1) (n + b) words. 



LOCATION 
6- -10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD 
14- 


COMMENTS 
-80 


REDUiC 


DIV 


L0C], A001,A000 + (n+l)(n + b) (Reciprocal of first 


element) 




RPT 


(n + b-1), 1,0, 1 




MPY 


A002,A000 + (n+l)(n + b),A001 +n(n+b) 




SRI 


0,(n-l)(n + b) 


UPR0JW 


RPT 


(n + b),0, 1 , 1 




MMY 


A001 + (n + b), 1,A001 +n(n + b),A001 , 1 




RPT 


(n + b-l),l,l, 1 




ADD 


A002 + (n + b) , 1 , A001 , 1 , A001 , 1 




TX1 


UPRpVMn + b) 




RPT 


(n + b), 1,1 




TMT 


A001 +n(n + b), A001 + (n-l)(n + b) 




ATR 


REDUC , ( n - 1 ) , NXTCM , 1 ( Counting control ) 


NXTC W 







n reductions are required, giving a new array in the identical block of memory 
positions, according to the following schematic: 



Original 
Matrix 



/ 



-Column 
Vectors 



Solutions 



/ 



Inverse 
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Orders of matrices which may conveniently be inverted in memory are: 

Memory size 8-digit mantissa 10-digit 12-digit 

20,000 38 35 33 

40,000 58 53 49 

A 10th order matrix may be inverted in 10 seconds, 20th in 1 min., 20 sec, 
and 25th in 2 min., 36 sec. The 50th order in memory takes 20 min., 40 sec, 
and approximately 25 min. on tape. The program kernel for inversion of a 
matrix stored on tape is shown below. Each record on tape 0208 is a row of the 
combined array. As shown, the coding is limited to 99th order because of the 
RPTs; insertion of multiple RPTs will increase the order capability. 



LOCATION 
6- -10 


OPERATION 
CODE 

11- -13 


VARIABLE FIELD COMMENTS 

80 


RTAPJ8 


RT8 


A001 


1 

1 


ATR 


R0W1, l,R0WN,(n- 1) 


R0W1 1 


DIV 


L0C1,AOO1 ,A000 + 3(n + b) 


1 


RPT 


(n + b-1), 1,0,1 


I 
| 


MPY 


A002, A000+ 3(n + b), A001 + 2(n + b) 


1 
I 


ATR 


RTAP8 , 1 , RTAP9 , 1 


R0WN 


RPT 


(n + b), 0,1,1 


-£..-_. „|. ,. 

1 


MMY 


A001, A001 + 2(n + b),A001 +(n + b) 


1 
1 


RPT 


(n + b-1), 1,1,1 


1 

1 


ADD 


A002,A001 +(n + b),A001 +(n + b) 


1 


ATR 


WTAP9, (n- l),WTAP8,(n- 1) 


WTAp|9 


WT9 


A001 +(n + b),A000 + 2(n + b) 


1 
1 


ATR 


RTAP8 , ( n - 2) , NR0W 1 , 1 


NR0^1 


WT9 


A001 + 2(n + b) , A000 + 3(n + b) 


RWTPIS 


RW8 




1 

1 


RW9 




1 

I 


ATR 


RTAP9 , 1 , RTAP8 , 1 


RTAP |9 


RT9 


A001 


- — I — 

1 


ATR 


R0W1, l,R0WN,(n- 1) 


WTAp|8 


WT8 


A001 +(n + b),A000 + 2(n + b) 


1 
1 


ATR 


RTAP9,(n-2),NR0W2, 1 


NR0W2 


WT8 


A001 +2(n + b),A000 + 3(n + b) 


' — 1 — 

1 


ATR 


RWTPS , n , NXTCM , 1 
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Appendix II— Example IV 

This program is to prepare a table of (X + cos Y)(X — sin Z), Y and Z being 
radian arguments. Each line is for 1 value of X, each page for 1 value of Z. 
Columns are for Y. 



SERIAL 
i A 


LOCATION 
1- 


OPERATION 
CODS 

II- -IS 


VARIARLE FIELD COMMENTS 
14- . M 




01010 




HDG 


Housekeeping. The line descriptions and head- 




01020 




HDG 


ings are not coded for purposes of this example. 




01030 


R008 


REG 


R001 > 


Reserve 




01040 


SINE 


Z REG 




working 




01050 


TEMI' 


REG 




storage 




01060 


X020 


REG 


X001 


Reserve storage 




01070 


Y008 


REG 


Y001 


for loading 




01080 


Z010 


REG 


Z001 d 


input data 




01090 




ENT 






01100 




RCD 


READER > 


Read 2 data cards. The first con 




OHIO 




RPT 


20, *4, 1 


tains 20 values of X as (xx. xx), 




01120 




FL0 


C0LO4, 4, L2, X001 


stored in X00 1 to X020. The sec- 




01130 




RCD 


READER 


ond contains 8 values of Y as 

L. 




01140 




RPT 


8,*5, 1 


(xx. xxx), stored in Y001 to Y008, 




01150 




FL0 


C0LO5, 5, L3, Y001 


and 10 values of Z as (x. xxx), 




01160 




RPT 


10, *4, 1 


stored in Z001 to Z010. 




01170 




FL0 


C0L44, 4. L3, Z001 






01180 




SR3 


0, 10 Control for number of pages (Z) 




01190 


PAGE 


WHT 


TAPE 4 Heading, 2 spaces before lines 




01200 




SRI 


0, 20 Control for number of lines (X) 




01210 




SAC 


Z00.1 , 3 , SINEZ Compute sinZ for each page 




01220 




TRU 


RSETY 




01230 


LINE 


WLS 


TAPE 4 Write single-spaced result line 




01240 


RSETTf 


' SR2 


, 8 Control for number of columns (Y) 




01250 




SUB 


X001, 1, SINEZ, TEMP X - sinZ in TEMP (for each line) 




01260 


C0LNI« 


I SAC 


Y001, 2 cosY in PAC 2 




01270 




ADD 


X001.1.PAC2 X+cosYin PAC 1 




01280 




MPY 


,TEMP, R001, 2 R001 through R008 




01290 




TX2 


C0LMN, 1 Re-cycle inner loop 




01300 




RPT 


8 , 1 , * 1 1 Fix for print rounded the line of 8 




01310 




FPR 


R001, 8, 4W, 2D values, R001 to R008 (xxxx. xx z ) 




01320 




TX1 


LINE, 1 To write present line, ■■ 20th 




01330 




WL1 


TAPE 4 Write 20th line, skip over fold 




01340 




TX3 


PAGE, 1 to new page on channel 1 control 




01350 




LVE 


To 705 HLT on completion of 10th page. 
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